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10 '••• FIRST SETTING 

20 CALL MUSIC:0PEN"GRP:"AS#1 :DEFINT A-Z: 
DIM A (3 -3) . D$(3.3) >N$(1 ) .NG(14) .PR (4) 
30 DEFFNP(N,M.L)=VAL("&H"+MIDS(RIGHTS("0 
00"+HEXS(A(N,M)).4).L.1)):PS#=1.5:DEFFNR 
(I)=70*(2/PS#) A -PR( I) :DEFUSR=342 
40 FOR 1 = 1 TO 14:READ NG ( I ) : NEXT : DATA 2. 
3.4.5.6,9,10. 12.14. 16.23.24.33.48 
50 H = 95:L = 5:KO=10: KF = 190:N$(0)=" ; E:/*2l"-9" 
:N$(1 )="*1>'J?" :LG#=LOG(10)/20/PS# 
55 DIM EX(7) ,EY(2) : FOR 1=0 TO 7:EX(I)=6+ 
I*8-(I>3)*8:NEXT:FOR 1=0 TO 2:EY(I)=14+8 
*I :NEXT:DEFFNSHFT=PEEK(&HFBEB)AND1XOR1 
60 '••• INPUT 

70 COLOR 15 , 14,0:SCREEN 0:WIDTH 40:KEYOF 
F:A = USR(0) : INPUT" TONE NUMBER" ;TN# 
80 IF TN#>0 AND TN#< 64 THEN TN=TN#:FOR I 
= 1 TO 1 4: IF TNONG(I) THEN NEXTrGOTO 100 
90 BEEP:GOTO 70 

100 IF TN=63 THEN GOSUB 380:CALL VOICECO 
PY(A,363) ELSE CALL VOICECOPY ( STN , A ) 
110 FOR M=0 TO 3:FOR N=0 TO 1:D$(N,M)=RI 
GHT$("000"+HEX$(A(N.M) ) ,4) : NEXT: NEXT 
120 TR$="h7^7*°-7 v ' = "+D$(0.1 ) :FB$="7<- h*rt 
*v7= "+MID$(D$(1 . 1 ) ,4) 

130 TN$=STR$(TN)+"=" :FOR 1=0 TO 3:CH$=RI 
GHT$("000"+HEX$(A(I.0) ) .4) : TN$=TN$+CHR$ ( 
VAL("&H"+MID$(CH$.3.2) ) ) + CHRS ( VAL ( "&H" +M 
IDStCHS. 1.2))) :NEXT 
140 '••• BASIC LINES & TONE NAME 
150 SCREEN 5 

160 LINE(KO.0)-(KO.H*2) .8 
170 LINE(KF,0)-(KF.H*2) .7 
180 FOR 1=0 TO 1:FOR J=0 TO 1 : L INE ( . H* ( 
J+1-I)+L*I)-STEP(255.0).I+1 : NEXT: NEXT 
190 DRAW"BM12.193":PRINT#1 ,TN$ 
200 '••• DRAWING & PLAYING(440Hz) 
210 FOR OP=0 TO 1 :FL=H-L:GOSUB 330 
220 IF PR(3)=0 THEN 290 '• PR(3)=AR 
230 LINE (KO.H+H*OP) -STEP(AR.-FL) 
240 IF PR(4)=0 THEN LINE -STEP ( KF- ( KO+AR 
) ,0) :SL = 0:RR = EG*RR:GOTO 260 '• PR(4)=DR 
250 LINE -STEP(DR.SL) :IF EG THEN LINE -S 
TEP(KF-(KO+AR+DR) .0) 

260 DRAW"C9M+8.-6M-3.-2M-5,8" '• MARK 
270 IF PR(2)=0 THEN LINE -STEP ( 255- ( KO+A 
R + DR) .0) :GOTO 290 '• PR(2)=RR 
280 LINE -STEP(RR.FL-SL) 
290 NEXT 

300 COLOR 1,0:FOR OP=0 TO 1 : PSET ( 1 96 . 1 1 + 
H*OP) .0,TPSET:PRINT #1 . N$ ( OP ) : FOR N=0 TO 
1 : DRAW" BM+ 196.0" : PRINT #1 ,D$(N.0P+2) :NE 
XT : NEXT : DRAW" BM 11 6. 193" : PRINT #1 ,TR$:DRA 
W"BM116.201" :PRINT #1.FB$:COLOR 15.14 
310 PLAY#2."3=TN;V1504L1A" 
320 IF STRIG(0) THEN IF FNSHFT THEN 500 
ELSE 70 ELSE IF ASC ( INPUTS ( 1 )) =24 AND TN 
=63 THEN 700 ELSE 320 
330 '••• PARAMETER READING SUB 
340 M=OP + 2:FOR 1 = 1 TO 4 : PR 1 1 ) =FNP ( 1 . M . I ) 
:NEXT:AR=FNR(3) : DR = FNR ( 4) : RR = FNR (2 ) : EG = S 
GN(FNP(0.M>3) AND 2) 



350 IF OP=0 THEN TL = ( FNP ( , 2 . 1 ) *1 6+FNP ( 

.2,2)) AND 63:FL=FL*EXP(-TL*.75*LG#) 

360 SL=FL*(1-EXP(-PR(1 )*3*LG#) ) 

370 RETURN 

380 '••• ORIGINAL TONE DATA SETTING 

385 IF TN$=" 63=NEWT0NE!" THEN RETURN 

390 RESTORE 420 

400 READ A$:A$=LEFT$(A$+SPACE$(8) .8) :FOR 

M=0 TO 3:A(M.0)=ASC(MID$(A$.2*M+1 ,1 ) ) +A 
SC(MID$(A$.2*M+2.1 ) )*256:NEXT 
410 FOR M=1 TO 3:F0R N=0 TO 3:READ A$:A( 
N.M)=VAL("&H"+A$) :NEXT:NEXT 
420 DATA BASIC :'TONE NAME 

430 DATA 0000,0000, 0000,0: 'TRPS.FB 
440 DATA 0000,0000,0000,0: 'MODULATOR 
450 DATA 0021 ,01F0, 0000 ,0: 'CARRIER 
460 RETURN 
50 '••• EDIT 

510 SCREEN ,0:SPRITE$(0)=STRING$(7,1 )+CH 
R$(255) 
520 LINE (3.3)-(1 13.51 ) >12.BF:F0R 1=0 TO 

3: PRESET (20 +1,6- I ¥2) , , TPSET : COLOR 1+14 
*(I¥2) ,0:PRINT t1 ."TOME EDIT":NEXT 
530 FOR 1=0 TO 3: PRESET C2f+I .6-1*2) .0.TP 
SET:COLOR 1 +1 4* ( I¥2 ) , : PRINT #1,"TONE ED 
IT":NEXT 

540 LINE (5.12)-(111 .49) ,5.BF 
550 FOR M=1 TO 3:F0R 1=0 TO 1:PRESET(7+I 
,7+M*8) .0.TPSET:COLOR 15:FOR N=0 TO 1:PR 
INT#1 ,D$(N.M)+" " ; :NEXT:COLOR 9:PRINT #1 
.MID$("T.FMODCAR" .M*3-2.3) : NEXT: NEXT 
560 FOR 1=0 TO 1 :PRESET(7+I. 40) ,0. TPSET: 
PRINT#1 ,"KTEM SRAD":NEXT 

570 S=STICK(0) :EX=(EX-(S=3)+(S=7)+8)MOD8 
:EY=(EY-(S=5)+(S=1 )+3)MOD3:IF INKEY$=CHR 
$(27) THEN 610 

580 PUTSPRITE . ( EX ( EX ) . EY ( EY) ) . 1 
590 IF STRIG(0) THEN N=EX¥4 : M=EY+ 1 : L=EX 
MOD 4+1 :UD=1-FNSHFT*2:MID$(D$(N.M) . L. 1 )= 
RIGHTS (HEX$( FNP (N.M.D+UD) .1 ) :A(N.M)=VAL 
("&H"+D$(N.M) ) :GOTO 540 
600 TIME=0:FOR W=0 TO 5 : W=TIME : NEXT : GOTO 

570 
610 '••• EXIT 

620 COLOR 15,U:TN = 63:TN# = TN:CALL VOICEC 
0PY(A.363) :FOR 1=0 TO 7:POKE VARPTR(A(0. 
0) )+I,ASC(MID$("NEWTONE!" , I + 1 . 1 ) ) : NEXT : G 
OTO 120 

700 '••• DATA MAKING 

710 SCREEN0:PRINT "EDITED TONE DATA":PRI 
NT"*********"***'**'***'*'********" 
720 INPUT "START LINE NUMBER" ;LN 
730 INPUT "TONE NAMEtWIDTHIN 8)";TN$:TN$ 
=LEFT$(TN$+SPACE$(8) .8) 

740 PRINT MID$(STR$(LN) .2) ;" DATA ";TN$ 
750 FOR M=1 TO 3:PRINT MIDS ( STRS ( LN+1 0*M 
).2);" DATA "::FOR N=0 TO 2:PRINT RIGHTS 
("000"+HEX$(A(N,M) ) .4) ;"." ; : NEXT: PRINT H 
EX$(A(N.M) ) :NEXT 
760 END 
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:RG NUMBER 
:READ SOUND RG 
: RG VALUE 
:BASIC 

:ASSEMBLE END 
.7:SCREEN 0:UIDTH 40 
:DEFINT A-Z:DEF FND(X)=VA 
L<"&H"+HEXS(PEEK(X)*PEEK<X+1 )«256) ) :DEF 
FNHX$(X)=RIGHTS("0"+HEXS(X) .2) 
1020 DIM RG(8):F0R 1 = 1 TO 8 : RG ( I I = ( 6+ I ) A 
ND7:NEXT:AD=&HF676 
1030 PRINT "9020 DATA "; 

1040 AD=FND(AD) :D$="" :0B$="" :C=0 '• init 
1050 E=PEEK(AD*7+C) '• new line 
1060 IF E = OR E = 58 THEN 1090 
1070 IF E = 32 THEN C=C+1:G0T0 1050 
1080 D$=DS*CHRS(E) :C=C+1 tGOTO 1050 
1090 ON INSTRI" LCR«" .LEFTS(D$.l ) ) GOTO 
1100.1110.1310.1320.1330 '• decision 
1100 IF D$="" THEN 1040 ELSE BEEP:PRINT 
STRINGSI2.10) :CHR$(13) :" "ERROR ! " : PRINT C 
HR$< 101 ;D$:" in" :FND(AD+2) :END '• error 
1110 IF LEFT$(D$.2X>"LD" THEN 1100 '•• 
read i ng "L" 

1120 RN$="ABCDEHL(Hl)":0PS=MID$(DS,3l 
1130 CP=INSTR(OPS.",") : IF CP=0 THEN 1100 
1140 OP$(0)=LEFTS(OPS.CP-1):OP$(1)=MIDS( 
0PS.CPi1):IF OP$(0>=~" OR OPS (1 ) =~~ THEN 

1100 
1150 FOR 1=0 TO 1 :OP(I ) =INSTR ( RN$ . OPS ( I ) 
):IF I0PIIX8 AND OP(I)>0 AND LENIOPSQ) 
)>1) OR (0P(I)>7 AND OPS( I )< >" (HL)") THE 
N 1100 ELSE NEXT 

1160 IF OP(0)«OP(1) THEN 0B$=FNHX$ ( 64+RG 
(OP(0) )»8+RG(0P( 1 ) ) ) :GOTO 1290 
1170 IF OP(0)>1 AND 0P$(1)<":" THEN 0B$= 
FNHX$(RG(OP(0) )«8+6) :AS=0P$(1 ) :K=2:G0SUB 

1340:OB$=OBStNUS:GOTO 1290 
1180 IF INSTR(OPS,"A")=0 THEN 1100 
1190 IF OPS="A. (BC)" THEN OB$="0A" 



1200 IF 0P$="A.(DE)" THEN 0BS="1A" 

1210 IF 0P$="(BC).A" THEN OBS="02" 

1220 IF OPS="(DE).A" THEN 0B$="12" 

1230 IF 08$>"" THEN 1290 

1240 IF OP(0>=1 THEN F$="3A" :A$=OP$( 1 ) E 

LSE IF OP(1) = l THEN FS="32" : A$=OP$ I ) EL 

SE 1100 

1250 IF MID$(A$.2) >"9" THEN 1100 

1260 IF LEFT$(A$. 1 X >" (" OR RIGHTS(AS.l) 

<>")" THEN 1100 ELSE A$=MI D$ ( AS . 2 . LEN ( A$ 

1-2) 

1270 K=4:G0SUB 1 340 : OBS=F$+NUS : GOTO 1290 

1280 IF OB$="" THEN 1100 

1290 PRINT OBS: :DT$=DTStOB$:OBS="" : IF LE 

N(DT$)>200 THEN PRINT "Oh.no!":END 

1300 GOTO 1040 

1310 IF LEFT$(D$.4)< >"CALL" THEN 1100 EL 

SE AS=MID$(DS,5) :K=4:G0SUB 1 340 : OBS="CD" 

+NU$:GOTO 1290 '•• reading "C" 

1320 IF DJ<>"RET" THEN 1100 ELSE 0B$="C9 

":GOTO 1290 '•• reading "R" 

1330 END '•• reading "»" 

1340 '••• Are you numer i c . reaL Ly? 

1350 IF RIGHT$(A$. 1 )="H" THEN AS=LEFT$(A 

S.LENIAS1-1 ) :GOTO 1390 

1360 '•• decimal (10) 

1370 A = VAL(A$):IF ASOMIDS (STRS ( A) . 2) TH 

EN 1100 

1380 IF A>16*K THEN 1100 ELSE 143B 



1390 
1400 
2) 

141 



hexad ic imal (&h ) 
IF LEFTSIAS. 1 )="0" THEN A$=MID$(AS. 



. IF LEN(AS) >K THEN 1100 
1420 A = VAL("SH"+AS) : IF A$OR IGHTS ( "000" ♦ 
HEX$(A) .LEN(A$) ) THEN 1100 
1430 A$=RIGHTS("000"+HEXS(A) .K) 
1440 AS=A$+AS:NU$=MID$(A$.3.K) 
1450 RETURN 

9000 CLEAR 200.&HD000:AD=SHD000:DEFUSR=A 
D:RESTORE 9000 

9010 READ A$:FOR 1=0 TO LEN ( AS ) *2- 1 : POKE 
ADtl .VAL("&H"+MID$(A$. I»2+1 . 2 ) ) : NEXT 



Kbx> J r , Ji^urn/c7KU 
y\umzmn-tizi\^7iyym 
yavt^ixzm'rjt&o ^©v 

isymyn<7z7A(DM'&CRE 

Turj^Tj^nB'u sRmnzw 

UiUbtztZ^lz^i:^ 

bas i ct^isymvmm 
©gwigu^-rst^B, X^E 

UfflSHF7FB£f£or^3 

z£tf$^mw^mmm 
§ 



&?tz>75X£ 



mmmL-v7.ii a b. c, d. e, h, 
LiWTr. rl. raB^ribSffi-r) 

(HL). (BC). (DE) -en-enm.. 
bc, DELV79mns^y^L-xtr 

il/HK«)» 

(nm) EA-fS«!)*Bnin«7Kwt 

■ SS^ •LD»*=(Drl Cr£*1»¥ 
»a)LD rl.rS *rl, rSffl-BB 
(HL)C»St9«.B[«„ f6b»#AL-y 
25>Sce>£5-75«{BCL (DE). (nm) 
IcBaia^Bis ©rCBt'vSfflf-S' 
nSt'jSTJIKILDr.n «rl*(H 
L)C>S**.B|M »CALLSS%=x 

^'jroysi/xnmswwai^waicA 

LL nm •RETSB^=D¥U ; ttit*lt 
t^5Ct£'SWa)RET 

■»«ro«Eic:t3Lir id«»i«ib** 

■ <„ l6it»B. ■JM&EXtC?<DH&tl 
WS. ©56i»* l A-FCJS5tSB*<!Da 
ilCD*HIJ«. CDEC** 1 ?. *fc. Z 
(OFtey 7-5 CB2iIKBffiS.SH 
■ffiUB r 'jSnSS|®«i»lcraB. i<D 
*tl3a«(T'^'<:*X*)«»<„ rJM 

BRioooj;oss.c«nH:s/uCtRi. a 

«B r : jMCKISROSUdilJ 
' : J li^S)oC5L.r^n5 r 5A#SSBL. 

to. »»c * ,mimm)tz»<D'fatf 

5. rJlD~70ffltt>7^#BS o ZCCRU 
NTSi r S020 DATA jCOBtlc 
VvVBx-S'SRSfSCOC. dffl'nC 
■h- •JIL-G&nitz 'J 9->=f-«» T. 

tarn. r RUN 9B00j*ssi7rn8. 
usR0*c-7£/>Hft>sBins. l;-3 

SHCBi5Urratn90D0WH«fflO 

■ L.rffi5tLiL\ SS»C. t»7Jl/B 
fl»!Ctt^>KUi/7.-9*^?AnrUS 
RMSSff.St. *OW>Sl/»?(D 

■susRH»m(i<ib^iif ?vym 
(*«©a o ma<Dfyyiutsstj>s.i> 

^P9-5A).S*i.l0l)A-('S*as.SVv 
VMTni'^AB^Bj. 
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sum 






vammA.*Ms&> 



+-/K-H C/3>tvr»J:3 ex 



titII;HPffl/cnfcn© LX.fr 

tCftU £U5©7WIiI& 

fci^K, 1©NOT#0? 
0©NOTtfl , ©Bf&fflt 
PR I NT NOT 

PR I NT NOT 1 

/S^fris-eic&So at?? 

U^B, 1©NOT#0 

ffi) mcz©isr\ l; -=> * nroits 



r Oj<±:l^r=bl6f!ffl0©&b 
/SEIS- H jtl5fi©0t 1 
II© 1 T-Cx*tz£Wm.tc£%7L 
S<IBUIWLV -&ur lffi 
Z'tC r NOTj^Uru<i 

„ tots-3-k.frisr? 

&(AAfcs ^©ftifxVX^ 
(CA^rn5 r SB-KOZA. 

L,Tfrri3Un(iItf7?iaTCD 

L^AtfUtb, C#)A,&£1\ 

jXSffliSS, f— Afflct 
5£, d©7P^5AB> iiS 
;Hit©v5a b-v a >&©/c 



RUN"SB-KOZA.BAS 



+-£» UrBOBAS I Cfflffl 






S C Q RE HI- S C R E 


•9 -■ ■< 1 f :■■ 

19 2 7 2 OR - 7 9 ? 




H E X E I N 


19 2 7 2 


4 E 4 8 3 1 1 110 1 1 8 
F F E 1 1111111110110 01 


-12 3 


F F S 11111111 iM® 


T I M E = S 6 



ttm^^OQyJUV^kXZ'DKAT. 




^^^^^ 


^^^ m 


1 






SCORE 5 H I - S C RE 5- 


KOZA.BASj S-Uff t 5 t Htm * 5 • WfcnSTG** 1 6ffl0> 
StSXr-A pW* U J 5 (nti.iiA.titZhtt'WmKo 

wastx&aimffi *<n±.^ 2*j(No-rwfc*tt 
fcx^-xu iia;s^itc7)^H n(iFniffitctttjnrv.'5a(i%-2 

-*<»#«: I'tf) SCOT, 3001-4 ffi-rtg^^^fci^SJI^L-Cu 


'Tr- 

- 3 2 4 IMP - 1 3 6 2 8 ? 




H E X 


BIN 


- 3 29 4 


S 2 I' 3 


1 8 1 1 1 8 1 1 
1 1 1 1 i 1 8110 


- 1 3 6 2 S 


'-.■ ft C '■- 


ii0yiSiyiiQ0H00 


bj N : I MP 


I IITlifT * I 


£20fflCO&Sfc*f;bS£, *££• ESC*-*}¥Ti\*<7>fc£ 




T IME = 105 




^ [ffiB©JW5]tt#fflU5liA/:*;£& (B I N)Z«/T<UrU5o ESC* 
tolOita, 16«»(HEX), EMS Ti^^nSo 
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1A/X|-2^K,<\<7«?SI 



Ore (WTO) : m*fi>frZ 
O : lvf>3o\ /RZftm=L-1— 

O: 7Jb=fUXAtoL^ref3S 
UriK^-vft/ufc-ttd:,, 

Or^tiSTMUS-SA/ 7 

ii/zruxAia^n^ACDam 

©3££efc/ 

7 : r\ ^hm^sw? 

O: 9S^rjSfflLyfcJTHE 

BADM I NTONjor^- 

A35ofcTU^o 

7 : 35ttlicfc<tti3rrfcd;„ r 

t, EAfti&Uffl&A/fc'cfc&o 



^3>tf353£l\n©Co 

o: ^n„ #@iazi>tfrL— $7 

£mffl7;i/Zf'JXA£fE3ffl„ 

&„ a i jgisr, wmtti} 
a&fii,riKor©iJ£5? 

f;<t, £=&#<, BigriMW 

6 1 AfflA-va>£fE-55 

7 : ?, fttffES©? 

O : ^nUtS^A. o 

7 : 35, 3d©£35, ^?BiL^ 

SXP^A^SiSUr, 7)1 
zl'J XA©ti}35£§|-5 =1 >x7, 

h£-rsor©tt£'5? 

O : lU\7-f x7 r-t$^tt 
^UfcLtfdtt&A;rb<fc? 

iap^m A-fAf/ 

O : 35, U&Oo 77i/"-ffl^ 




?n^A*fWC35fcor 



H"HE BADMINTONjTli 3 > 
\>D. — 9am&i\,— ?>X\ 
*->a-y l-frtTOlSJM 

• ->ay kb««((3-v;i'+ 

-A*lc<fcS4«ig)x(h U*' 
-A/3U«fcS2ffiB)0>8ffi$) 

**ub frustrate*/;^ iRco 

CDttfix <X?CAtTI'5 
BADMINTN . EXT(*<* TS * 
i t)iim IX, t> fcOTTQ *fi 

®gUt;u-x>T-£5ET# *$» 

— x^Tfa^fts^Hi-cto 
fo-T a fc t <r>y~ a $=7 Aictt* ij 

S ••-••> g -y Knag(0=*Tfc 
*a\ 1=?V+-, 3=Kn-y 
7'-^7'f>, 5 = 7yxa, 7 = 
X"7.y->i) 

T £U£.H<-x ><?>-> a >y K7> 

&§l(0=Sl\ 1 =§§U) 

(DteLhots^^rs/ziftc, $n 






• 7"n?7AttBAS I COTAo 
lOOOWSf)*/'**— fe-7'Lfc 

•5ii«wi©*i£ 

• 80-:-: y<nj£>*ffltti::<&£*JS 
£fcft4-<!5AL J/iSiJUU-S 



tSWft'JitoOjimiOOO 

— ^>£iiAD-f smrm *» 

: I FE=1 THENGOSUB 

to fi-1000WST(iS(->a -y h 
om^)tT(->a-y htf>5£§l)£ 
IS$L4to -<7>ffitlJ->-vl-JU 

Cra)A*8»-f i tzm-nbtizcn 
XWt-MKz.ft-Z) t £ (i S = (•> 
a-y KWBSK *Tfcfci.»i:#tt 
S = frfSS L 4' Itftti'fc U t. * 

io, ^(7MiBt\ f<7)->ayh 
«rtTTtt'J:v.^*^-JS<S, T 

$»lc*t5Si U (TMiA-'A-pT < ft 

ur, fctxa»L*Mii-7T4<T 

Tt (*tlfi<mtltz!g,mJl>-1-> 
frt?Tirti.»\X-ti?)o 

*, -tj-^—^xoe&icRE 

T U R N X %• Aft 5 (7) frSftfc I > 



• r 7 n y f-x-f ^^^+ js r — 

•yVTtmjt^x-m^zto 

•l*'<-i><7)'(=7 7.Mr>W:%lzr 

ZZto 

• frXfttttO^-Vlzfrt) Zto 
A'^Kivhv-jira^iB,, 

• 11J!;fcB<7>;8fWr!a>o 

• Aiif^Uii* 'J ->i-JU • 7 y X 
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SCREEN 1 >2:COLOR15.1 .1 : DEFINTA-Z : KEYOFF 
:WIDTH32:F0RI=12T019:READA:S0UNDI-7.A:VP 
OKE8192+I.235+I:VPOKE8200+I.-(I<15)*255: 
FORJ=0TO7: VP0KEI*64+J . 127+ J : NEXT J . I : FORI 
=0TO95:V=V+1-(I>25)*31+(I>48)*33+(I>73)* 
31 :VPOKE6146+V.I*2MOD64+160:NEXT:DATA.31 

2 P=PMOD7+1 :K=RND(-P) : FORI=0TO13 : F0RJ=2T 
015:V=(VPEEK(P*8+I¥2)AND2 A (J¥2) ) >0:K=K-V 
:R=RND(1 )#8:VP0KE6328+I*32-J.32-V*64-V#R 
*8:NEXTJ> I:L = 5:SPRITE$(0)="<~3A.A.A.~< 

3 f=5:X=4+TIME/2MOD9:Y=1 :M=1 :N=1 :DATA8. . 

4 X=X+M:GOSUB5:M=M*A:X=X-(A<0)*M:Y=Y+N:G 
OSUB5:N=N*A:Y=Y-(A<0)*N:PUTSPRITE0. (X«8. 
Y*8-1) ,9-(F<1) :S=STICK(0) : IFSTHENS= (S¥5 ) 
*2:VPOKE8212+(W+2-S)MOD8.0:W=WMOD8+7+S:V 
P0KE8212+(W+S)M0D8,255:G0T04ELSE4:DATA16 

5 A=0:IFXMOD31ANDY>-1ANDY<24THENV=VPEEK( 
6144+X+Y*32)¥8:V=V*SGN(VPEEK(8192+V) ) : B= 
V<20:A=-1-(F>0ANDBORV<12)*2:IFV>11THENSO 
UND4.-V*12*B:SOUND13.0:IFBTHENLOCATEX.Y: 
PRINT" ":K=K-1 :F=F-1 : IFK=0THENRETURN2 

6 IFATHENRETURNELSEFORI=0TO255:SOUND4.I: 
SOUND1 3.0: NEXT :L = L-1 : 1 FLTHEN3ELSE LOCATE 1 
4.21 : PRINT" END!": POKE -869.1 : RUN: DATA. 12 



VtLZt 



W&tofflfc 



x, y x-)i><Diu.m 

A tK-HsWR®?^? ffi 

W-Jz>9(- 1 : SlfTS, 1 : 
SltlySLV D : "7-AH® 

B ;Rffl 

F TK-JWDIH^OcfcOA 

soma, -Juvzc&tciT 

i , j iv-ym 

k ynyyomo 

L 7K-JU0SO® 

P Xx-vif 

R ^O'^fflMSffl 

S Xx-fy^A^MI 

V SfcO*iJSffl(7K-ib© 

uezmm) /mm 
w zr^jv^mm 



7D?7AJIK 



(©) zfuv^hwmfc 

•iMMfb«8iase««P 

StPSGUvX^iSfflf- 

8) Xx-2>8J»Hb 



• ^ISMff«^P 'V ?©?!^» 

7K-Jb©SOISlS^»7K-Jb© 

•MMMb^P sg L- y;^ 

/&®7jftxi$.ft3i%i/xmm 
mm/Ym&m.m/fcfc<omm 
yy'\/®m73faYf&'ftWM/ 



WBdarmutM 



— flMfldvS?. 



5©{ss»&©tei;3; | 3«A;r'rtt£:\ ma,c:sais9j3. i:«*/j-*?ft 
©-r2<»/u£<£ur3-»jODB)o ^©BW^iJfflur7D^^A=iv 

„ ^ttCi'^tU-E- 

3H\3:L-fc»\ r TR I PL 

E J ©a < tA.s/v,M»fr7-''r 

S;KJ3«OUSf„ d©? 

-a, s/y^o=t<a§t. 
Sfco«a#eMA\©c§e 

«<©r, &/&W3SL-J: 
KJ*^x-i"52.ffl©£=«- 

— *2 , j?'1/cl-su*l.&. 

^©^©■ytuofctjt^. 




J^^t-itTA/ 



YlS#*tIE//1t-Jb©?!^)« 
Xx-f ^AM^A^tfS 

nB"5^7hfflil(SCRE 

en i ra, sx^ctce^ 
^sr*5©^WfflLr, %%. 
^.^mo^^^ztz^^-y k 

fiS]tc3D-g>£?©e£B<U J5 
£HIttIl<0m3©/co a x a> 

orivg>9l-?©d;5&fc© 
r, AttiSfr&Utf, KttBL\ 

rEx^cotiq]L;)«PSGu 
y^^iSfflf-s-ffi l rile 

•MS^ffl1b»5X¥iJS^7K- 

;uA' ; ^-AH®i*ic£nB"^ii 

B/<3OfrofcfflBgfr©¥0£ 
= X&63!lSS//K-JH£9« 



yte-ymm/'jyi>4 (st 

OP*-)«PSGLy^g 



liS 



OTor*-r>cii'J§um-g>o 
^Murus. GOSUBr 

OftftrjU/c^IItt, RETUR 
LU„ #H][iig!Itf'>fc^©r 

ran br guv 
.cfAAGiURUSHI/ 




Z^-7.,-'86#>'><r-h8HSfim**> 8 3-§«7 7>5'-AB EST 5l«S£C<t 'Jfctt*^fcU*r. 
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WARS 



: ::■ 



ES3ES32/2+RAM8K BY J»7j<§ 



>muynt/\]^-zJ 



10 COLOR15.4.4:SCREEN1 . : UIDTH32 : DEFINTA 

-Z:KEYOFF:A$="":FORI=0TO7:A$=A$+CHR$(VPE- 

EK( 1064+1) ) :NEXT:SPRITE$(0)=A$:ONSPRITEG 

OSUB80:SPRITEON:X=15:Y=10:O=20:P=20:R=5: 

FOR I = 0TO22: LOCATE 1 . I : PRINTSTRINGS ( 30 . "Q" 

) : NEXT: FORI =1T021 :L0CATE2. I : PRINTSTRINGS 

(28. "0") :NEXT 

20 SC=SC+1 :S=STICK(0) : IFS=0THEN30ELSEV= ( 

S=7)-(S=3) :Z=(S=1 )-(S=5) 

30 X=X+V:Y=Y+Z:IFVPEEK(6144+X+Y*32) >80TH 

ENX = X-V:Y = Y-ZEI_SEPUTSPRITE0> (X#8.Y*8) .15 

.0:LOCATEX.Y:PRINT"«" 

40 R = R-1 :IFR< >0THEN60ELSER = RND(-TIME)*10 

:W=RND(-TIME)«2:ONWGOTO50: IF0<XTHENQ=1 :T 

=0:GOTO60ELSEQ=-1 :T=0:GOTO60 

50 IFP<YTHENT=1 : Q=0ELSE IFP >YTHENT=-1 :Q=0 

60 0=0+Q:P=P+T:IFVPEEK(6144+0+P*32)=81TH 

ENO=O-Q:Q=0:P=P-T:T=0:R=1 

70 PUTSPRITE1 . (0*8.P*8) . 4 . : LOCATEO . P : PR 

INT" ":GOTO20 

88 BEEP:CLS:LOCATE10.10:PRINT"SCORE ";SC 

:FORI=0TO1 :I=-STRIG(0) : NEXT: RUN 



VtZt 



E\?mmiz-?tz 



ta*8]-eros, /wu>&poit<zMS 



xptM77>©^e^^u 
nrscAorustf„ st, 

-7ttRffl^©»»B«IS^a» 

tv£>czi£t><ot ! Sz, m 
rsuu 




^§$<Z>!iB* 



x, y yi^tv-omm. 

o. p MCDmW 

a$ xy^-i v-w^yfe 

mm 

i )b-ym 

q. t M(D®mmft 

FL W SLKffl 

S TJrJvQKh 

SC 737 

v, z y\s-<v-ommm 



JUV^hMltir 



•mmmmi fmmmwT. 
y^-i \>i\ j 9-vsm»7.y^> 

•yy^-ib-mmmoiwiozfo 



©) *-A2l 



• XZ17 



»XT-f'^A* 



•y^^v-mm(Dmmmwm 
[tmmtt t iz t c:fyis-( 







(tf))i»a)it^ 
(§) y-M-n- 

•yh^m%mmm£*7,z\7(D 
mm%<jy[y-< 
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04 K^-J/? 



ES3E232/2+RAM8K BY HIDEYUKI 



► JgTOIifl^v-S/ 



1 SCREEN 1 .1 >0:COLOR0, 1 2 . : WIDTH32 : KEYOFF 
:DEFINTA-Z:SPRITE$(0)="xxh*- 3 qvv":VPOKE81 
94>254:VPOKE8204,238:E$=CHR$(27)+"Y" :FOR 
I=1TO5:M(I)=M(I-1)-I#15+105:NEXT:A$=STRI 
NG$( 128.96) :READS$:S$=S$+S$ 

2 CLS:PRINTE$"!*RANK "CHR$ ( 72-R) E$" > "A$ 
S$" "A$:R=R+1:G=1:L=0:H=0:K=0:W=1:X=0:G 
0SUB6:PLAY"T0LV15GRGRGR05C : G0SUB7 : SOUND 
8.16:S0UND12>1 : SOUND 13. 8: SOUND 1 , 1 

3 SOUND0,150-H*2:T=S:S=STRIG(0) :G=G-S*(T 
=0)*(G<5):H=H+(G-7)#(H<M(G)):L=L+H:PRINT 
E$")*GEAR"G;E$"X*" USING" SPEED ###km/h";H 
:K=K+R+23:GOSUB6:IFL<120 00THENIFK<2160TH 
EN3ELSEW=0 

4 PLAY n L32CFDER8CFDER8CR32EF16R" :PRINTE$ 
"6'WINNER IS "MIDSC'COMPUTERPLAYER!" >UI*8 
+1.8) :G0SUB7:IFR<8THENIFWTHEN2 

5 VDP(7)=RND(1 )*16»W:PRINTE$"0+GAME OVE 
R": IFSTICK(0)THENRUNELSE5 

6 F=1-F:X=(X+2)MOD3:PUTSPRITE0, (L¥50,102 
+F) .8:PUTSPRITE1 . (K*9.143-F) .4.0:LOCATEX 
.16:PRINTS$:RETURN:DATA — * — ' — * — v — % 

7 IFPLAY(0)THEN7ELSERETURN 



VtZt 



r cj^ftjtsga»5tr 



[H I DEYUK I ]£^a3>Cgofct5B,t7ori.Jll =rUti 
C835£J§orUfcA\afc9*m*©?7yV^ACUfc(BB«<!:fr 

«atOo^^d:5i-A r g i 3-7S'r-i'?x^o r s i lentjA. -hoi 







stowi 




mnomm 



AS iiOx-^ 

ES CHFI$(E7)tfA5 

F ^©±T©«iffl 

G WKD^V 

h yu-<p-(Dmm 

i Jb-^ffl 

k mcDMJS 

l ^u-r-v-©^fjS6ii 

M(n) ^noigilg 

R z>yy 

S< T hU^-A^Jffl 

s$ &u(D?-y 

w mm(Dz?^y 

X Q$I©7.i7P-JL/ffl 



ynt>"5LMm 



mmm zm'ijBCDmffimmyy 

fcmtffir3'\ 



O) B3S0H* 



•a^g»K#©aS« U-7. 

«it7©fls=!>^/c«i< ©rsn 



(Dmmmuyi'-i 



qjwmmm 

yy^ \^ixy—y£M%^vz> 
yyvsmmmmmmmfe 

(Q)?-kmwm7rs 



tMWM£;9-jyy 



•^©RB^OV^OMSf^e 
*g ©7.^7 p-JU* ■} >^©MfJf 
•^©^•6*1©^ 







^ y- *. . 




• ftA&eft 



Weft 
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as^<tt-v>< 



EE3EE32/2+RAM8K BY Syu Sot 



► JSOF75li4g^-y 



| frto«}SnSt»^ti-/i/©r, KEYl. CHR$(e55)£»70r, 
f i ^-rffS^zx/ctrUo 




1 C0LOR1 .3.3:DEFINTA-Z:D 
.V(1 ) -A(1 ) >B(1) ,C(1) :X(0 
(1)=124:Y(1)=135:A(0)=10 
:B(1 )=11 :INPUT"0 OR 1 " ; F 
07:SPRITE$(N)="<~M«~<" 
S0UND3.3:S0UND5.3:S0UND9 

2 DRAWBM120.100L40U40L2 
0L52U80L100DU0R212UU0L 
(25.25) .14.1 :LINE(120.64 
:LINE(120.124)-(132.156) 

3 FORI=0TO1 :FORN=0TOF:S= 
N)+(S>5ANDS<9)-(S>1ANDS< 
80RS=10RS=2)-(S>3ANDS<7) 
Y(N)=Y(N)+V(N) :PUTSPRITE 
) .N+5:PUTSPRITEI+2+N*4> ( 

4 S0UNDN*2+2. (255-10*ABS 
55:P=P0INT(X(N)+4.Y(N)+4 
EIFP=30RP=1THENX(N)=X(N) 
V(N) :H(N)=0:V(N)=0:GOTO6 

5 IFPOA(N)THENC(N)=C(N) 
:IFC(N)=8THENG=TIME:BEEP 
XT:COLOR15.N+5:SCREEN1 :L 
: PRINT" --"T"»" INT (1 00* (G 

6 NEXTN.I :G0T03 



IMXd ) -Yd) ,H(1) 
)=124:Y(0)=135:X 
:B(0)=11 :A(1 )=10 
:SCREEN3:FORN=0T 
:NEXT:S0UND7.49: 
.14:SOUND10,14 
0D60R132U60L20D4 
100D40L12":PAINT 
)-(132.96) .11 ,BF 
.10.BF:TIME=0 
STICK(N) :H(N)=H( 
5) :V(N)=V(N)+(S= 
:X(N)=X(N)+H(N) : 
I+N#4, (X(N) .Y(N) 
X(N) .Y(N)+5) 
(H(N)+V(N) ) )AND2 
) :IFP=14THEN6ELS 
-H(N) :Y(N)=Y(N)- 

+ 1 :SWAPA(N) .B(N) 
FORW=0TO2000:NE 
OCATE8.10:T=G/60 
/60-T) )"--":END 
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P «£¥!l£ffl 
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0) £A/M-X£ 

n-7ffiii«TiMEfflMib 



•Jb-;??!&»7x-r y^Afl 
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ES3E532/2+RAM8K BY YIS 



► JBTCfiMS^-y 




^©^D^^A©a 1 IC^5 r 3KjB+-/K-K*6BilSfTS3«)«:n3<: 
?r?. KEY1. CHR$(E54)£HtTUr. F 1 ^-rffSZA/T 

1 COLOR15.5.5:SCREEN1 . : WIDTH6: KEYOFF : DE 
FINTA-Z:SPRITE$(0)="8«aKdt»r8": LOCATE. >0 

2 VPOKE8194.238:VPOKE8195.50:VPOKE820 0.1 
74:VPOKE8201 , 142 : VPOKE8202 > 206: FORI =4T02 

1 : LOCATE. I :PRINT"X X" : NEXT: X (0) =1 5 :X ( 

1)=16:Y(0)=18:Y(1)=18:PLAY"SM9000O4L64" 

3 E$ = CHR$(27) :R=RND(-TIME) : FORJ=0TO250 : P 
RINTE$"Y! "J¥5"km":PRINTE$"Y# ":PRINTE$" 

LX X":P=RND(1 )*4:T=RND(1 ) *7 : T=TM0D3 : L 

OCATE1+P.4:PRINTCHR$(68+(T#8.5) ) 

4 FORI=0TO1 :X=X(I) :Y=Y(I) :G0SUB7: 
0THENS=STICK(I) : X = X+ (S = 7ANDX>1 4) - 
X<17)ELSEG(I)=G(I)-1 

5 PUTSPRITEI . (X*8.Y*8) . 5+1 . : G0SUB7 : X ( I ) 
= X:Y(I)=Y:NEXTI.J:I = -(Y(0XY(1 ))-(Y(0) >Y 
(1) )*2-(Y(0)=Y(1))*3 

6 PRINTE$"Y#"I"pwon'':PLAY''L14GFEDGFEDGFE 
DC:FORI = 0TO1 : I = -STRIG ( ) :NEXT : RUN 

7 V=6144+X+Y*32:IFVPEEK(V)=23THENRETURNE 
LSEIFVPEEK(V)=68THENY = Y + 1 : PLAY"E"ELSEI FV 
PEEK(V)=85THENY=Y+(Y>6) : PLAY"G"ELSEG ( I ) = 
5 : VPOKEV . 23 : PLAY" C : RETURN 

8 VPOKEV. 23: PUTSPRITEI. (X#8.Y*8) :IFY>23T 
HENI=2-I:RETURN6ELSE7 
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(S=3AND 
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©^ttnSor^esru^AtfSUtoUU^&tf^/u&^r 

t7T<. X^CADfcUiUp* 
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CE32/2+VRAMB4K BY EM3r] 



► 310^1*35^-5/ 




| frt>i!SnS3»S1+/uCDZr. KEY! 

f i *-rjiS3/ur<fc'*t\ 



CHRS(255)^»fUr, 



10 



r-n= URABYOSHI < t PUZZLE GAME ] > = H~i 
HH = PRESENTED BY MASASHI TANAKA ««-F 

20 CLEAR200: COLOR! .4. 1 5 : SCREEN5 » 2 . : OPEN 

"GRP:"AS#1 :DEFINTA-Z:DIMR(9.9) >R$(38) ,0( 

38).M(38),N(38):R=1:Y(1)=-1:X(3)=1:Y(5)= 

1 :X(7)=-1 :P$ = "V1*4T255L64O4S0M500" 

30 FORI=0TO9:R(I.0)=4:R(0,I)=4:R(I,9)=4: 

R(9,I)=4:NEXT:F0RI=2T06:READA,B,C:C0L0R= 

(I.A.B.C) :NEXT:F0RI=1T08:READA$(I) :NEXT: 

FORI = 0TO3 : RE ADA. B. CD: SPRITES (1*2+1 )=A$( 

A)+A$(B)+A$(C)+A$(D) :NEXT 

40 FORI=1T03:READA.B.C.D:LINE(A.B)-(C.D) 

.1 .B:LINE(A+1 ,B+1)-(C-1 , D-1 ) ,5.BF:NEXT:F 

ORI=0TO8: LINE (1*21 +11 , 21 ) -STEP ( . 1 68 ) ,6 

50 L I NEM1 .1*21+21 )-STEP(168.0) ,6: NEXT: F 

0RI=188T0228STEP2fl:PSET(I,48) :DRAWS4C1D 

9F5R9E5U9H5L9G5RC3D9F4R9E4U9H4L9G4RC14D9 

F3R9E3U9H3L9G3": PA INT (1 + 3,48) .15. 14: NEXT 

60 X$="RDR10ULDG3R4G2ULH4GH2LF4RG2NU2LU4 

G2":DRAWBM192.47C2RDR4URDR5ULG2L5DR5DL5 

FR3BL7"+X$:DRAWBM213,48C1RDR3F2RL5RE2H2 

R2D2R4ULDL3D3LBL5"+X$+"BM233,57C14LFR2U6 

HR2D7R2U10HR2D6R3ULG2D4R4UL" : COLOR. 5 

70 PSET(224,98) : PRINT* 1 ,"»A." :PSET(192.11 

9) :PRINT#1 ."IDZ*)" :PSET(191 ,140) :PRINT#1 ," 

BY fcS*" :PSET(223,148) :PRINT#1 . "SJL" : FORI 

=1T038:READR$(I) .0(I).M(I),N(I) :NEXT 

80 FORK = 0TO5:FORJ = 0TO3:FORI=0.TO1 :Z = VAL(M 

ID$(HEX$(ASC(MID$(R$(R) > K*4+ J+ 1 , 1 ) ) ) , 1+ 1 

. 1 ))-4:IFZ>0THENCOPY( (Z-1 ) *20 + 1 88 . 43 ) - ( ( 

Z-1)*20+207,62)TO(J*42+I*21+12.K*21+43) 

90 R(J*2 + I + 1 . K + 2 ) =Z : NEXT: NEXT: NEXT :X=1 :Y 

= 1 :U = 3:0=0(R)+1 :M=M(R) :N=N(R) : GOT0 180 

100 S=STICK(0)ORSTICK(1 ) : IFS >0THENU=S+SM 

0D2-1 :IFU>8THENU=7 

1 10 PUTSPRITE0. (X*21-7.Y*21+2) .1 .U:IFSTR 

IG(1 )ORSTRIG(0)THEN190ELSEIFS=0THEN100 

120 E=X+X(U):F=Y+Y(U):Z=R(E.F) :IFZ=4THEN 

100ELSEIFZ=0THENFORI=1TO7:PUTSPRITE0. (X* 

21+I*X(U)*3-7,Y*21+I*Y(U)*3+2) .1 .U:NEXT: 

X=E:Y=F:GOTO100ELSEP=R(E+X(U) . F + Y(U) ) :IF 

P>0ANDP<4THEN100 

130 G=E+X(U) :H=F+Y(U) :P=R(G.H) :A=E*21-9: 

B=F*21+1 :IFP=4THENLINE(A.B)-STEP(19. 19) . 

5.BF:R(E.F)=0:GOTO180 

140 IFP=0THENCOPY(A.B)-STEP(19. 19)T0(G*2 

1-9.H*21+1 ) :LINE(A.B)-STEP(19.19) ,5.BF:R 

(G.H)=Z:R(E.F)=0:E=G:F=H:GOTO130 

150 V=E:W=F:PLAYP$+"O5G":GOSUB220:IFZ=3T 

HEN180ELSEFORJ=1TO7STEP2:E=V:F=W:L=0 

160 E=E+X(J) :F=F+Y(J) :P=R(E,F) :IFP=3-ZTH 

ENL=L+1 :GOTO160 
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► 83sV7K7L/-e^h^Si 



(5i r 7xrU-7 



170 IFP=ZANDL>0THENE=V:F=W:FORI=1TOL:E=E 

+X(J):F=F+Y(J) :COPY( (P-1 )*20+188.43)-STE 

P(19. 19)T0(E*21-9,F*21+1 ) : PLAYPS+" 0CG" : G 

OSUB220:R(E,F)=P:NEXT:M=M-L*(1+2*(P=1 ) ) : 

N=N+L*(1+2*(P=1 ) ) :NEXTELSENEXT 

180 0=0-1 :PSET(216. 119) : PRINT* 1 .O:IFO>0T 

HENPSETM92.98) : PRINT* 1 .R:GOTO100 

190 PUTSPRITE0, (0.220) : IFM=0ORN=0THENR=R 

+1 :PLAYP$+"0CDEFGAB":FORI=1TO7:COPY(12>4 

2) -(178.209-1*21 )T0( 12.21 ) :NEXTELSEPLAYP 

$ + "0BAGFEDC:FORI = 1TO7:COPY(178>167)-(12 

.1*21 )T0(178.188) :NEXT 

200 IFR<39THEN80ELSELINE(33,43)-(157,167 

) .1 .BF:LINE(38.48)-(152. 162) , 3, B: LINE (18 

8 . 85 ) - ( 247 , 1 27 ) . 5 . BF : DRAW* BM63 , 97C3S32LU 

3HR2DR3U2F2R3UR2D2G2U2L8D2BR2HR5FL5BGR7F 

L3D3RE3D5L5HU4LD3G2LH2R3EU2L2HR2" : PAINT ( 

40.50) . 15.3:X=14:Y=1 70: T= 14000 

210 PLAY"V14T50O4L2B-BB-","V14T50S0M80 00 

05L2F+F F +": FORI =0TOT: NEXT: FORK =0TO1 : FOR J 

=1T07STEP2:F0RI=1T0147:X=X+X(J) :Y=Y+Y(J) 

:PUTSPRITEJ. (X.Y) , 1 : NEXT: NEXT :K=0: NEXT 

220 FORK=0TO400:NEXT:RETURN 

230 DATA 5. 0,0, 3. 3, 3. 7, 5, 4, 7, 5. 2. 6.0, 0.B 

■■-■■■»»•■. Bt-jtt ^ -^B.BfctititfcfcB.I .7.2.8.5 

.6. 2. 4. 7. 3. 8. 4, 1.3. 5. 6. 7. 17, 183. 193. 186. 

41 .249.64.187.84,248. 168 

240 DATADDDDDFDDeTUdDEDDDEDDDFDD. 1 .6.4.D 

DDDDTTDEeUDDTTDDDDDDDDD.3.8. 1 .DDDDDdTdDD 

DDDdTdDDDDDDDD.4.2.4.DDDDDdTdDdTdDdTdDDD 

DDDDD.4,3.6.DffdDdTdDdTdDdTdDffdDDDD,3,3 

,16.DDDDDdtdDDDDDdtTDDDDDDDD.5,1 .3 

250 DATADDDDDEFDDTDDDFEDDTDDDDDD.5.4.2-D 

DDDDdTDDDFDDedDDDDDDDDD .6.2,4 

260 DATADDDDDGDDDttDEeeDDttDDGDD.5,3,2,G 

DtDFDdDDDFDDTDDFEGDDDDD,5.2,4,DDEDDTDDDD 

DDDFtDDTTDDGGD ,5.4.1 , DDDDGEGDDddDEDEDDdd 

DGEGD.5.4.4.DDDDDDDtFeDDFDDtFeFDDDDD.5.2 

.6.DDDDD9tDfGtDdDTTfGtDD9tD.5.2,7 

270 DATADDDDDGwdEGDGDGwdDDDDDDDD,6. 1 .2.D 

dttDDwDDtDDDGGTDDGDDDTD.6.2.1 .GtwDGEGDGE 

GDGFGDGtwDDDDD.6.2.1 . Dwwt Dt Dt DFeDDDDDDt D 

tDGGD.6.1 .2.DdFDDDDDFDDdDDDDEDFDDDDD,6,1 

-5,DDDDDdTDEDFDDdTDEDFDDdTD,8.5.5 

280 DATADDDDFDDDEDgDtDDtDEDDGDdD.6.2.3.D 

DutDGtwFFDEDGtwDDutDDDD.6.3,2.DDDDEDdTDD 

dDDDdDFffdDDDD.7,2.9.DwEDDDGDtDEDDFDtDDt 

DDDDD.7,2.1 > DTEDEf VTDTFDDdEDEef TDTED , 8 , 1 

2,8.DdTtDDEDGDtDDttDDdvtDDDD>7.2.2 

290 DATADGDDGDWDDddDGDWDDGDDDDDD. 10.2.2. 

DDDDDdTdDDDDDTdTDDDDDdTd.9,4.5.DDDDDffdD 

dTTDelldDTTdDffd . 6 , 7 . 1 4 , GGFDDDDDDDDDETt DG 

DGDDDtD.8.2,1 , Dt GDDFDDGDTDDEDt DDdDDt GD . 6 

>2.2.DDDDGwwwDTddDDDDGwwwDDDD,8. 1 .2 



-;u;SKS j= <«EBJi>artFt!S<|lf,lffi><?gGEg<l?*a>S*9«= "© r -P-r 7.</ t.t—1 



#27j= citisa>4*tfSie<e*w>#^tsi.<*Bai+>ajs«>3 -7>r f >*w? ^ 6 j =<tai»>±m;xs^<"f j mm> : sn~»\<s,'iSM>m*& 



300 DATAttttGGGGttttEEFGttttGGGG.9.2.1 .D 
GgDDtDt DdDTDtDt DGWDDDDD. 7.2.2 .EDvDDdGDDE 
DDGDdDFtEDDDDD.9.3.4.DDDDGdWDFDEDDDDDEDF 
DGTgD.10.4.4.DTEDEffTDdFDDdFDEffTDTED.9> 
8.12.GUftFDDTFDDTEDDdEDDdGf Ut .13.8.8 
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= C TEST PLAYER LIST D = 

= 10 * K-TARO 

= 20 ' Mr. KAWAMURA 

= 30 ' KAKAMI KUN 



r-n n 



I l_l 



mncomm 



X. Y £EP©JHI=>x2l- 

X(n), Y(n) ^»i§» 

E, F £EP© 1 ^©Htl 

G. H ttWR-?9c(Dmm 

A. B, C, D ;Hffl 

A$ T.y^b/W-y'fe 

mm 

i , j, k n-ym 

l isMt&mcDm 

M, N -5-©®©*taffl|fiJ 

CMS 

M(n) s N(n) SHlz^S 

o mo^m. 

OCn) SE©iHIE¥« 

P ttU(D3;t)D(D'&m 

P$ PLAYXfflMMLx 

R SO 15 

R(n, m) i£*JVRAM 

R$(n) Ex— 9 

S X-x-CV^AA 

T UXhSSSfffl 

U *ED©73lS] 



J I 



nsei 



v, w mwmm 

X$ DRAWXfflGML? 



?n^Z*8iB 



10 REMX 

eo~30 mmmmm^y^mm 
am/Esmm/wmss. 'x. 

40-70 EStM 
80-90 HfFfiE 
100 XJ-jyfA-ft 

110 ^EPi^/^TT^^iJ 

S 

120 ^EP^IffiS 

130 |6)^**lJS 

140 ,|fi)^»*iJ^ 

150-170 ®&mm 

180 SO¥S*iJS 

100 £rV7mfe/2V77' : E 

200 #— Jl/^-'JT'SIS 

210 J-IVCUTt^E 

220 K^s-y-? 

230 /"CU^ K?— ^ (fr30T:^ 
foZfo)/ X^-fhA^-V 
t 1 '— ^ {f53QT?W&foZfo) /MM 

240-300 m^-^Cfjiuvm 

ih-Zcb-) 

310 REMX 



VtZt 



MOiilttrtLtU^ 



5BtpfiHlr^ -B»'Sffbfc-iifflzix5'fHi'a-^43' : 70iiJ!e 
#tfri?cM©#tti;r*fcii,i5^-3-^!»5a©4a7©^#iUx 

c±38B©KasH©K't? o aiftroytxju-y-Aocfrismasro^d; 

A— vaVtSo 

rt,3©A— Vm 
V#IWV5©ttS 

<i:C©'y-Affl 

SS#/cl:t&©tf 




^P^/xBRfflT 1 — 9 ffiU75tt67^-S/ 



10>WA24 


20>EVX2 


30>Cqn3 


40>jxY1 


50>tNR2 


60>evK5 


70>VoC2 


80>o5i3 


90>X3o0 


100>GiO0 


110>MDZ0 


120>SjP4 


130>d3M1 


140>A7R1 


150>W8g0 


160>ZeS0 


170>CII5 


180>P9M0 


190>elQ3 


200>q176 


210>0Ku2 


220>8520 


230>WHq6 


240>xwi5 


250>2HZ0 


260>Tdc5 


270>a4X5 


280>26o5 


290>ZAr5 


300>hNo5 


310>9657 






O A^ 0> 



e- 



; / 




• ^S#Bi]<lRS*li>+iW»«<g»JS>*5S9^<«S»>**«<*BB»*Baa<iK*»>&3*lE* 55 



*/tJI/9lffiM 



CS32+RAM8K BY 



tmUfiltmi-V 




ranscft^-ttA,,, keyi. chrs (144) ^Hii-mta". f i *- 
r-JT^^Kj^fo H®ris^e<t[ssy/)'ofrA c i:t\fflr;iSL/r<fc*u„ 

10 CALL KANJI0:SOUND7,8:SOUND 11.38:S0UN 
D12,0:SOUND13,12:SOUND8,0:SOUND1 .2 
20 COLOR 15,1 .1 :SCREEN5:KEY0FF 
DIMA$(100) . B$(100) .C(100) 
1=1+1 :READA$(I) , B$(I) .C(I) 
IFA$(I)="END"THENELSEIS=I:GOTO 40 
COLOR 8: LOCATE 11 .2 : PRINT"*** Uv£°" 
COLOR14:FORII=0TO1 : L0CATE4. 4+1 1*4 : PR I 
VMr¥V$*¥*¥*¥*¥V¥9¥*¥9¥V¥" :NEXT 



30 

40 

50 

60 

70 

NT 

80 GETTIMEA$:FORI=1TOIS:V1=VAL(MID$(A$(I 

) .1 >2)+MID$(A$(I) ,4,2) +"00") 

90 V2=VAL(MID$(A$,1 , 2) +MIDS ( A$ , 4 , 2) +MI D$ 

(A$,7,2)):IF V2>=V1 THENNEXT 

100 T=I-1 - ( 1=1 )*IS 

110 IFF=1ANDC(T)=0THENSCREEN5:F=0:GOTO60 

120 IFC(T)=0THEN150 

130 S=STRIG(1 )+STRIG(0) :IFS=0THEN SCREEN 

3 ELSE IFF=1THENF=0:SCREEN5:GOTO 60 ELSE 

GOTO 150 

140 F=1 :LOCATE0,1 : C0LOR6 : PRINT"U«!**»*C" 

; :SOUND8,16:G0T0 80 



150 S0UND8,B:C0L0R14:L0CATE7.5:PRINTA$(T 

) :LOCATE9,6:PRINT"»- " ; : COLOR 1 : PRINTMI D 

$(B$(T)+STRING$(16," ") ,1 ,16) :COLOR3 

160 L0CATE7,7:PRINTA$(T+1+(T=IS)*IS) 

170 GETDATEB$:LOCATE5>10 

180 COLOR 7:PRINTB$" NOW "A$;:GOTO 80 

190 DATA " 4:00" . »N4L*», 1 

200 DATA " 4:01",llgjid ; Px*Z*t>>0 

210 DATA " 4:10" , ->pl»P*tt*otG*i.>>1 

220 DATA " 5:10" ,«xte4Z4i',0 

230 DATA " 5:20 w >^fcJK*.j*7*3*Z4n ,1 

240 DATA " 6:50",IDV**^x*V.0 

250 DATA " 7:00",l>*lllfm>.t;C4*,0 

260 DATA " 7:30" , ->p?n«>tt*7*i:i4Z4i.- . 1 

270 DATA " 8:30">#¥*»»Z>w»s*P.0 

280 DATA "15: 20", #¥*>}"» Z>mJ>L-7K*Z*i.. ,1 

290 DATA "16:50" >«x*7*Z4i>,0 

300 DATA "17:00",£¥a$*Z*m£¥-7K*Z4i«,1 

310 DATA "19:00".t:SH4Uj;C^Y,0 

320 DATA "19:30", <ct^T«7k=4Z4'i>,1 

330 DATA "20:00".7hHT4Z*i<,0 

340 DATA "20:30".5»UJijn*ta«5«a*Z*i»i1 

350 DATA "23:30",*t5ti4mtpi>t4Z4i, ,0 

360 DATA "23:50",®*»-H*g4+>0 

370 DATA END, END, 



mnomm 



A$ mm 

A$(n) mm?-? 

B$ Bft 

B$(n) mm?-5> 

C(n) y+f-ON-OFF 



F y+f-73? 

k I I Jb-^ffl 

i s x-^a 

v i T—5>*omm*m 



vtzt 



wswmwib 



stiassiN^tt/urufco gfl-tL-rttya-f^T-fj/^rftorus* 



mz^otzi\t^.i\mto 





by &•>$+// 



V2- 

fcfi 



■mftommzmmikis 



•ym#3&Mm 



3D le^iJaS 

40—50 "r—ZWfoZfo 

60-70 BSftfiS 

B0 BfSiJx-^ISflCgift 

90 ^ffi^J^aHC^^/1 

ioo JisKSijc^is-rsx- 



no mmmzmm 

120 ?+f-HE-KON-OFF 

130 mmm 

no x^tz-ysm/^if- 

150 jy-zmt/mtemm 

160 SS7RSISS 
170-180 m&Btt-mmiK 
190-370 B3£lJx-$\ ISf 
-$\ ^-t-Kf-^ (S40 



zfuv = 5h$mm : r- 


-•$7 ffiL^I*67^-i> 


10>FvF0 


20>At20 


30>Gw20 


40>aO40 


50>MD70 


60>Pu60 


70 >mvb0 


80>K1T0 


90>KVX0 


100>OJ30 


1 10>Ic60 


120>bb10 


130>UoV0 


140>u9F0 


150>CEg0 


160>Fj70 


170>eR10 


180>1S40 


190>Nk30 


200>ZZ60 


210>iQ80 


220>p950 


230>KFB0 


240>Yu50 


250>XW70 


260>GFB0 


270>wN80 


280>c6C0 


290>1S50 


300>qjB0 


310>AJ70 


320>D990 


330>IL50 


340>tPE0 


350>1DB0 


360>BB70 


370>k610 
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:il* r 



FFB7U-tf>h^iSS (J-'-t-^Tv^»^xl-» J =<g*«>5ffi*m<BlUm>*fflfaA-B#i«<«<maSB>+SfS»]<S«!m«« 




WPlf *M<WM£t 



CS32/2+VRAM64K BY fcxrtX 



► JSOF73 1*36^-2; 



10 COLOR15.0.0:SCREEN5.2:SETPAGE0>1 :CLS: 

DEFINTA-Z:DRAWC15BM30.30M34. 10D20L4":PA 

INT (32. 28) >15:DRAW"C14BM34.10M38,30L4U20 

": PAINT (36, 28) > 1 4 : OPEN"GRP : "AS #1 

20 SETPAGE0.0:FORI=0TO21 : COPY (30. 10) -(38 

.30) . 1T0 (30+1*9.135) -0:NEXT 

30 FORI=0TO31 :A$=A$+CHR$(VAL("&H"+MID$(" 

000000071 F3F377B7D7B7B7B3E3D1F07000000E0 

F8FCECDEBEDEDEDE7CBCF8E0". 1*2+1 .2) ) ) :NEX 

T:SPRITE$(0)=A$:FORI=0TO4:READA:LINE(50. 

125+1) -(205. 125+1) ,A:NEXT:0NSPRITEG0SUB1 

50 

40 E=-7:F=-8:C=0:D=0:X=50:Y=190:M=1 :N=1 

50 SPRITEON:S=STICK(0) :Z=STICK(1) :X=X+(S 

=70RS=8)*3-(S<4ANDS>1ANDX<Y)*3:Y=Y-(Z=70 

RZ=8)*(Y>X)*3-(Z<4ANDZ>1 )*3:E=E+1:F=F+1: 

C=C+E*M:D=D+F*N:PUTSPRITE0. (X.109+C) .2.0 

:PUTSPRITE1 . (Y.109 + D) , 6 . : IFX<40THEN1 60E 

LSEIFY>202THEN170 

60 IFE=6THENE=-7:PLAY"V15L16O5G":ELSE100 

70 IFPOINT(X+8.127)=1THENPUTSPRITE0. (X.I 

20).2.0:GOTO160 

80 IFM=2THENLINE(X.125)-(X+16.129) , 1 , BF : 

M = 1 

90 IFS<3ANDSO0ORS = 8THENM=2 

100 IFF=7THENF=-8:PLAY"V15L16O5G":ELSE50 



110 IFP0INT(Y+8.127)=1TH 

120) .6.0:GOTO170 

120 IFN=2THENLINE(Y.125) 

:N=1 

130 IFZ<3ANDZO0ORZ = 8THE 

140 GOTO 50 

150 SPRITEOFF:PLAY"T255V 

<D)*(D-C)*2:X=X+(D<C)*(C 

X.109+C) .15.0:PUTSPRITE1 

RETURN 

160 SPRITE0FF:E=-7:PSET( 

2P V) 1t*\" :PLAY"T255V15L1 

=0TO6:E=E+1 :C=C+E : PUTSPR 

.0:NEXT:FORI=1TO40:C=C+1 

09+C) .2.0: NEXT :PUTSPRITE 

T01 :I=-STRIG(0) : NEXT: RUN 

170 SPRITE0FF:F=-7:PSET( 

1P ff'6!":PLAY , 'T255V15L1 

=0TO6:F=F+1 : D=D+F : PUTSPR 

.0:NEXT:FORI=1TO40:D=D+1 

09+ D) .6.0: NEXT :PUTSPRITE 

T01 :I=-STRIG(0) : NEXT: RUN 

180 DATA 4.7.15.7.4 



ENPUTSPRITE1 . (Y. 

-(Y+16.129) .1 .BF 

NN = 2 

15L6407A":Y=Y-(C 
-D) :PUTSPRITE0. ( 
. (Y.109+D) .15.0: 

90.60) :PRINT#1 ." 
605BAGFEDC":FORI 
ITE0. (X.109 + C) .2 
:PUTSPRITE0. (X.1 
0.(0.212) :FORI=0 

90.60) :PRINT#1 ." 
605BAGFEDC:FORI 
ITE1 . (Y.109+D) .6 
:PUTSPRITE1 .(Y.I 
1 . (0.212) :FORI=0 



m&omv* 



x> c mtDft-iwmm-* 

D&+\wuzmm 

a m(D&m.^m 

as jw-ymmm 

e mtt-iuD'Jvyyti 

f m-K-iuDwyy-ft 

N/k N yt>775^«* 

i =y—-7)vwyy. s=a 

■ivvy? 

s, z zkT-^-voxmm 



-juv^umm 



id — eo mmwmwm ,-$mm 
3D a^-fs/w-vsea 



40 mmns. 

50 7.^Yhii5?Bi©§J0 3 

60-90 w<DK-)imm®>m 

60 mmm 

70 ftCSSfcA^JSE 

bo MVvyyi>z\,\k.u 

90 luvvyymn 
ioo~i3o moiti-iimmmm 
ioo mwrn. 
no ftcitsjbMwe 

130 juv^yymm 

140 fir 50^=6 £3 

150 3.?^ Sig3?Bf©»J9 

160-170 T.^-fhfl^© 

u o 3 fcm±/ mmm / ?- a 
ioo ex-^(fj3ors!*3^) 



vtzt 



*->Miimi,-ftfc 




ur<n/co ft/nt. 
is<p<iDE*§#a;ttu 



-juo^LMmm?- 


-^ flEL\75tt67^-y 




10>rHk1 20>62Q0 


30>kpf4 40>p1I0 


50>4ip6 60>1G80 


70>WVA0 80>AgA0 


90>Kw50 100>qr70 


110>1dA0 120>4hA0 


130>m060 140>N700 


150>x8c1 160>xIC5 


170>ZrC5 180>m410 
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**MtO97&0 



ES3ES32/2+RAM32K BY SYUNSUKE 



+mm\xsi*s-v 




A/C<£*1\. ^P^^A?JTS3^*lt3ofct), RU 

«b, £rofc»uofc/u'.;tz'j/S£i,r<fc'au„ 

16 ••CE82C5D5C07BD6E6B757CD1B047A383CFEB 

52B3C21011BCD4A8BBE741E2ACD38D53811DD7E8 

5CBD7FE8528B57ABEB11815AF*181CCD7BD6E687F 

EB528823EaiCB472BB13C4F7ACDF3D2711884CDF 

3D27ED1C1C9«CE6BFD7EBBB72B2BFD7EB3B72825 

2lB8lBCD4A0BFE8B3BlB23Ct>4ABB4F2lB91BCD13 

041EBDCD38053B 

2B 'B93EFEDD77B6CD7BD4C921B91BCD13D44F21 

Bl 1BCD4AB8B9DD7EB238B2ED44CDBBD4C9»CFB72 

168011 1AB3AB613C506B8CD4AB8EBD5C586B4BFC 

B1BCB2B1BF9B6B4BFCB1ACB2A1BF97ACD4DBB23C 

D4DB8E5B118BBB97BCD4D8B2BCD4DBBE1C1D1EB2 

31318C«>EB61 1BBBB9E8C1 18BF215DD61 18B38B6B 

7C5B14BB8CD5CB 

36 'BBE4BB9D50E1 1EBB7ED42EBCD52DBD1 D51BC 

DS20BD1EBC1 18EBB6B621 1 DD27E23E52 l'BBBB 1 E8 

8C08BD9E BE 1C5B188BBCD5CBBC1 EB1 BE821 53021 

1B52881BBB8CD5CBBC9B61B1ACD4DB81B231BF8C 

9BB8BB3BFlFlF3fl2F3F38151EeEB38B8 8BBBBCBB 

8B87C8CF4FC1CEBF8F8CB88BBB8 80B8BBB3B7BFB 

FBFBFB7B38BBBB 

48 'eBB8BBBBB8BC6EBF8FBFBFBEBC8BBBB0B0 0B 

BBClE16flDB7B5B5B7e33A2D646lB6BE8B3e7868B 

BE8ABA8EBCB5CB426866B78BB8C1E168D6765252 

7321ABD8481BEBC8 83B7B688BE6A6A4E44C58BB2 

6867B3BBE33415D3E26265C437616C3286DC6BB7 

8CC82BA7C64643AC26E68C314B67S8BBE31415D3 

2323E5C437696C 

58 '364BD1A8B788C82BA4C4C7C3AC26E69C3A63 

BD88B387C7C3B234C5E5A2D211AB2172936BC1C3 

E3EDCC4327A5AB4845943EB966C381C3E3E1D234 

C52522D211A821629366C387C7CB8C4324A4AB48 

459436B966C3B1C3232329CA8EB4F5D3F0FDEA4A 

BA8283B4C4C4C3915D6F2BAFCF87B25D515148B8 

EDFD1B1AAEF4F5 

6B 'D3FDEDEA6AAAB28B171FB8BBD5 5F6F2BAFC7 

B7B6555D51483e7B589eFB9BFBC37797647692E8 

C1CCBEBAB98FB9BFB3BEC9E6EE296743B38B3B7B 

5B98D296E4C77793687B98EBCBEC8E8AB9BBB947 

632EE9E6CEe9e7eSB7BB3B2BEB888BEB2733C831 

F1B1B373732CB4B7B1B1B7B4BCE3CC8F8D808ECE 

C4CB3B28E88686 

7B 'E92BBBCDBDF4B3BB767B6CB4B701B167649D 

D3D0BFBD2DCEBE 8686 1BBFDF9F3E7CF9F 8 162807 

E7E7E7E7E7EBB63FFFFFFFFFFFFFFBB68C381BB5 

57D46BABD7BDFDFDFBBFBFBFBB838B87E7E7E7E7 

E7EB811F4F1F4F4F4F441B1E144«D2ABCDE6D321 

8B1BC04ABBFE91D4EBD31EB116B1CDE8D7C9»D2C 

BAFF077B33E1BF 

88 •D77B23EFEFD77B116B2CDE8D7FD7288D1C9« 

02E83EFEFD77B13E14FD77B216B1CDE8D7F072B8 

C9D521FFCD16B85819D1C9«O3BB23234664CDB0D 

4FD219lD2CD68D528FBBeeBBBBB8BB6B2CDBBD4C 

DA8D6eEBBC038D4CDlBD438B5CD7BD4184CDD7EB 

8B728B5CD6BCE1841CD6BD4FEB12BBA3EFE0D77B 

6CD7BD4183B4FE 

98 •6B3FEB32B2979FEB7DD7EB228B2ED44CDBBD 

4BB8B0BB8BBBBaBB8eeBBBBB8B0eB088BBBBBBBB 

BB8BBBB8BBBBBBB88C068D5 3A9BD24FCDA8D4BBB 

8A1 28872 1B88822F8F7C91B873E85CD9BD4CDB7B 

6082181 1BCD4A8821 851 BCD4DBBC315D3FEB 1282 

221B11BC04ABB16B31EEBF04EB5BD28B516FD5F3 

E85BB38B73EB2F 

IBB 'D77B301C91EflBC91EB316FDCDE8D7C9«D3E 

BBEBF16B1 1 8B4BEB0 1 68821 B31 B79C04DBB21 871 

B7ACD40B8C9«D4BB218BD278FEB22Be32187D2E5 

DDE1C98B21B81BD5581D3EB4C0BBD9CD4ABBFEAB 

01C9«D43BCD1B042323D07E81811EB4CD5BD4CD4 

DBBC9»D45BC5D54FAF4757CD4A317BD1C1C9BBBB 

BB783DD9CDD5BB 



1 18 'D9C9«D478C018D4DD4E8681CD4DBBS779FE 

FECB7ADD56B3BADB3EB2DD77B6C9«D49BC5B6FF1 

BFE302BF9C1C9«D4AB783DD9CDD888D9C9«D4BBF 

5781E886E61FEB22BB41E8BBE5121B91BCD13D45 

7F18293B9DB83CD4DBBC9FF218B1BCD4ABB4F23C 

D4ABB57CD1BD41EBDCD3805D821B91BCD13D44A1 

E8DCD38D5C9 

128 •.05BBF3D9212BD5B6B87E235ECD93BB2318 

F73EABCD98D43Efl71EF8CD93flB[)9FBC9B8B637BB 

BBBCBABDB80A1B87D884BBB5B2«D53891B3F57B8 

73C5FF1BBC9«D548CD78D6FD4EB56D2BB5E65FC6 

78C9E67FC9«056BCDABD40D4EBBB1C8CDDB04DBF 

D7EB5B828B5FD7EB6B7CBAFFD77B3FD78fl53E81F 

D7706218B1BCD4 

13B 'A8BFD778923CD4A8BFD77B8CD18D4FSBEB1 

3BB28E82CD3BD4C0B8D5DD5EB41661BEFEFD7EB7 

B72B883CFD77B71C1C1CBCCD6B0467DD7EBBB728 

B6C082CEBBBB67F13BB5CD2B06181F3EB72EFCCD 

6BD6BC28831DBEFF3EB32EB4CD6BD6BC2BB11C3E 

B5BC2BB216BB783D28B47AED445 7CD78DA3EBACD 

5BD45FF072BBFD 

14B '71B1FD73B2CDEBD33EFF3DC9«D62B3E81BC 

288C3EB1FD77B3DD7EB5FD77B4C93EB5BC2BB410 

1D1DC9BEB216B23EB72EFCCD6BD6BC2BB1153EB3 

2EB4CD6BD6BCCfll4C9«D66BC585C1C885C9«[>67e 

ED5F87BB3CC9»D68BFD6EB5268B22F8F7E1E1E1C 

9«D6A8FD56BBFD5EB1FD7EB3B728B4CDA8D7B8CD 

B8D7FD7EB1B7F8 

158 "FD5EB21DFD73B2C8ED44FD7701C9«D70B21 

8B1BCD4A60835FCD4DBB23CD4ABB8257CD4D8B3E 

A5BBDC8BD63EFBBADC8BD663FD7EB6B7281AFD4E 

B87A1E2BCD38D53B8BFD4E897C1E28CD38D538B4 

AFFD77B67CFE7BD87A8E741E8ACD38D50BCDB8DA 

BB7CFE733BBBCDE8D28BBB8BBBB8BBBBC9166C1E 

FFFD7EB53D2884 

168 '168C1E81FD73003E02FD77017A21811BCD4 

DBBC9«D7985BDACBD7A8D3C8D2ABD'2BBDA»D7AB3 

EFFF077B2218ED7FD7EB4875F16BB195E2356EBF 

D7EB3E9«D7CB16BBFEB12B1D21BB1BCD4ABBFEB5 

3B1B3EB2F077B3CD48D588efl23CD4DBBDlC9lEFE 

C91EB3C9FFFFF5FD7EB53D28B47AED4457F1C9*D 

8B8DDE5D93EB81 

17B 'EBDCD938B3CCD93803C1DCD93B0DD2137D8 

AFCD86D8DD213ED83EB2C086D8DD2145D83EB4CD 

86D8D9DDE1C9«D837BB81D912D9128BBBB1D918D 

912BBBBB10978D978BflB357B2FAB2A7B281823BB 

1FDB1C5B1ACB17DB 15381 4881 1 DBBFEBBE3BBD6B 

BBEB8AA8BABBB8FB87FBB71BB6BB838BB2B8B18B 

B18BBB8BBB4BBB 

186 '632D508DD46B80D4EB1BB79BB285CD066B2 

DD6E837EFEFF2B87DD66B4DD6EB57E5723DD7482 

DD75B38EBB1E88E6BFFE87281C3887D688DD7786 

18D9214CD84FB6606909DD7E061EBECD00D94E23 

5E3E84CD93B83C59CD93BB7AE6FBBFBF6FBF4FB6 

BB2176D8B9B946234EDD7BBBDD7leiC9«D9BBC5D 

5E54FAF4757CD4 

19B 'A31El19D1C1C9B88A67eA4251772B515277 

415677B926BA5B51774B8956772556BA5B77B946 

557726428A4251772B51 527741 5677B926BA5B51 

774BB956772556BA5B77B94655772432135253BA 

5BB91 6545 58A51 12585 1531 253525 1B8B94546BA 

4B41 4 BB9464 556BASBB9B6FFFFFFB9425 1774877 

5B5142415B7788 

268 '467756B95B414BB8567745775S 568948884 

25 1772247B942517748775B5 1424 158778846775 

6B95B414BB8567745775556B94BB842517722B94 

74758 51 585 1 5B5 1 585 1 SB 51 585 15B5 1525 1525 15 

2515251525352535253525352535453525158515 

851 56 51 5B51S6515B41 42434443424 15253525 15 

25152515251525 

218 -1 5251 FF»DA1 821 32DA1 88321 31 DAF3119FF 

OB1B36BEDB6C09BBB21350A1 137D8B1 15B8E0BBF 

BC9C9C3BBD888B1D912D912BBBB81D91BD912BBB 

8B1D978D978BB«DA5B3E3B3D2BBAFD7EB3EEB3FD 

77B33E3B3251DA16811EBBFD7E63FE822B0416B0 

1E81CDE8D7C9FFFFFF3E3B3251DAC9FFFFC07B06 

E687B72BB13CFE 

228 ■8638B23EB25721811BCD4AB8BE741E2BCD3 

8D57A3812CBD7FEB528637A18B97AFE653EB428B 

23EB3FD77B4D1C9BBD9AFFD7763CDE0D3D9C9+ 

238 CLEAR26B.&HCD4F:AS="DD2A76F61 1676BDD 

19DD7E88FE2A28BDCD95CDCD86CD67CD86CD6F18 

ECFE2BC8CD86CD772318E20D7E8BD63BFE8A38e2 

D667CD95CDC9C077CDB7B7B7B7F5CD77CD4FF1B1 

C9F5DD23DD7E68B72BB511B8880D19F1C9" 

24B F0RI=8TO84:POKE&HCD58+l, VAL("&H"*MID 

St At, 1»2*1 .21) :NEXT:DEFUSR=&HCD5B:A=USR( 

81 



25B SCREEN1 
FF:DEFINTA- 
A0RA*2: VPOK 
1 SHUNSUKE" 
LLEY BALL 
26B DEFFNAS 
)=MIDS(STRS 
(BWSTICKd 
FFNC=RND(1> 
»<A>6>)*( (B 
FUSR1=&HDA1 



.2.BTC0LOR15.1.1: 
Z:FORI=384T072B:A 
El.A:NEXT:LOCATE8 

LDCATE5. 14:PRINT 
FORI=BT02BB6:NEXT 

RIGHTS! AS. 31 )*BS 
(RND(-A«B>>.3.2>: 
) :DEFFNB=STRIG(6> 
«5«1:DEFFND(A.B.C 
=C-4)«<A<D) 1 :DEFU 
B:DEFUSR2=&HDA15 



UIDTH32:KEY0 
=VPEEK< I) :A = 
.8:PRINT"199 
"EXCITING VO 
:CLS 

:DEFFNB$(A,B 
DEFFNA=STICK 
+STR1GI 1 ) :DE 
D)=A-( <B=C) 
SR=&HCFB7:DE 
DEFUSR3=SHD3 



278 DEFUSR4=SHD5BB:FORI=1T06:READMS(I) .H 

S(I) ,T(I) : NEXT : FORI =1T06:READNS II) ,SP(I) 

. J (I) .HI ).AT( I) .C( I) :NEXT:DATATRAINING. 

CHOROCHORO. 1 . MATCH . MOZUOTOSI .5. PASSWORD. 

B00ERANG.3.".TY0KUGEKI.2." .TOUMEI.4." 

,"",6 

28B •tZ/l/aT'-J 

?9B DATA NORANEZUMI .2.8B.4.1 .12.IB0DAK0. 

3.6B.6.2.9.TANUKINEK0.2.85.5.3.15.DEMEKI 

NGANI .3.90.6.4.14.NAZONOHAGE.3.7B.6.5.11 

."xxxMRxX" .5.65.6.6.15 

386 I=RND(-TIME) : FORI =1T02 : LV( I ) =FNC : PL ( 

I)=FNC:NEXT:M=B:TT=8 

31B GOSUB746:J=B:A=1B:GOSUBS90 

326 IFM=2ANDTT=6THENPLAY"03C8D8F8E2":F0R 

I=8T015B:A=FNC:SETADJUST(A.A) : NEXT: FORI = 

1TO8:COL0R=(I .8.8.81 : NEXT : FORI =BT01 S : FOR 

J=BT01 :PUTSPRITE3. (2B8.16B) . J»1 5. PL (2)»3 

:FORK=BT01B8-I«18:NEXTK. J, I 

336 G0SUB648:A=USR1 (B) :A=USR31S) 

348 B=USR2<B) :G0SUB726: IFA=BTHENG0SU8S78 

:GOT0318 

358 B=VPEEK(&H1BB1 ) : W=1 - ( B< 1 26 1 : IFB>216T 

HENW=3-A 

368 PUTSPRITE8. . 15 :GOSU868B :S IU) =S (W) - (S 

= W-1 ) :S=W-1 :GOSUB66B:IFS<WK7THEN330ELSE 

IFM=2ANDTT=6ANDU=1THENG0SUB93BELSEG0SUB5 

28: LOCATE 13.6 :PRINTUS I NG"«x_x#" :S ( 1 ) :S(2 

) : LOCATE 11 .9:PRINT"UINNERxIS" : LOCATE 12.1 

1 :PRINTUSING"PLAYERx#" ;U 

378 FORI=0TO6086:NEXT: IFM< >2THEN3BBELSE I 

FU=1THENG0SUB76B:A=56:E = 184:B=58:C=15:D = 

0:F=0:GOSUB890:A=USR4<0) : 1=64 :A= 3 : 6=192 : 

C=C(PL(2)) : D=PL( 2) «3*2 :G0SUB91 B : LOCATES, 

15:PRINT"YOR ARE VICTORY" ; TAB ( 68 ); "YOU C 

AN PLAY NEXT MATCH" : FORI =BT06B88 :NEXTELS 

ETT=TT-1 

38B G0T031B 

398 •*' , -&a»;0 "f-Jt-r »7* 

488 GOSUB6BB:CLS:C0L0R.A:A=USR(B) 

416 COLOR=NEW 

428 A$=-pppp"+STRINGS(27."a")»"p":B$="p" 

: LOCATES. 8: FORI =BT03: PRINTAS; :A$=FNAS:NE 

XT:DS=STRINGS(32."p" ) : PRINTDS : : AS="pppp" 

♦STRINGS (26. "h")t"pp":F0RI=BTO3:CS=AS: MI 

DS( AS. 1B )=" p ++♦♦♦+++ ♦♦♦p": PRINTAS: AS: : AS 

=C$:AS=FNAS: NEXT: PRINTDS; 

436 PRINTSTRINGS(32."x") : "xxxSHUNSUKExxx 

xxxxxxMSXFANxxxxxx";STRINGS(32."c" 1 :G0SU 

B72B: IFJTHENRETURNELSEAS=" "tSTRINGSI 

27,"c"l»" ":B$=" ":F0RI=BT04:PRINTA$: :AS 

= FNAS: NEXT: FORI = 16T021 : LOCATE 1 5 . I : PR INT" 

8": NEXT 

448 SCI )=B:S(2)=B:S=B:A=&HD28B:F0RI=1T02 

:A(8)=LV(I) :B=PL(I) :A(1)=B«3:AI2)=SP(B): 

A13)=J(B):A(4)=L(B> :A(5)=AT(B) :F0RJ=BT05 

:POXEA*J.A(J) :NEXT:A=A+J+1 : NEXT : P0KE&HD2 

9B.-(M=B) : IFM=6THENL0CATE9.9:PRINT"HIT+S 

PACE+KEY" 

45B RETURN 

466 '7°U<1— tl/7h 

476 F0RE=1T02»(M=2> 

486 G0SUB6B6:CLS:C0L0R.4:A=USR(B1 :FORI=B 

T018:L0CATEB.I:PRINTSTRING$(32."h"l :NEXT 

:PRINT"xNAME". ."xATTACK" . . " xLEVEL" : AS="h 

hh888888h" : BS=" hhh8**t*8h" : AS=AStAS*AS+" 

hh" :BS=BStB$*BS*"hh" :F0RI=BT01 :L0CATE8.1 

+I«9:PRINTAS;BS:BS;BS:BS:A$ 

496 FORJ=6T02:A=3«ItJ:PUTSPRITE2*A. (46+8 

e«J.24*72«I) .C(l-fA) .3*I«9*J«3:NEXTJ. I:LO 

CATE13.23:PRINTUSING"PLAYER« OK CANCEL" 

:E; :IFCL=6THENPUTSPRITE7, ( 266 . 96) . 1 5 . 39 
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58B X=40:Y=6B:X1=4B:X2=208: Yl =68 : Y2=132 : 
A=8B:B=72:G0SUB54B:C=(X-X1 ) /A- I Y=1 32)«3+ 
1 :L0CATE8.2B: IFC=6ANDCL=BTHENPRINT"CAN N 
OT" :FORI=8TO2B00:NEXT:GOTO48BELSEPRINTNJ 
(C) : LOCATES :PRINTH$( AT IC) ) : 0=8 : FORI = BT01 
: L0CATE8:IFDTHENPRINT"C0M":ELSEPRINT"MAN 

518 J=FNA:D=D+( ( J=1 ) « (D< 1 ANDn=l )-( J-5)«( 

D>8) ) :GOSUB62»: I=J : FORK=8TO50 :NEXTK. I: PL 

(E)=C:LVIE)=D:X=88:Y=176:X1=Be:X2=184:A= 

96:B=8:G0SUB54B:A=-(X=184) :0NAGOTO488: NE 

XT RETURN 

528 -li^tjZ 07? 9*7. 

538 PLAY"0CDE":G0SUB6BB:A$=STRINGJ(13."8 

" ) : L0CATE9 ,3 : PRINTAS : F0RI=BTOl B : L0CATE9: 

PRINT"8"*STR1NG$(11 . "x" ) *"8" : NEXT : LOCATE 

9:PRINTA$:RETURN 

540 't-h»tWt'Si % ; a-Vl-ft-*? 

550 PUTSPRITE8. (X.Y) . 1 5 : J=FNA:C=X:X=X* ( ( 

J = 3)»(X<X2)-U=7)»(X>X1) )»A:D=Y:Y=Y»((J= 

5)«(Y<Y2)-IJ=1 )»(Y>Y1 ) )«B:IFX< >CORY< >DTH 

ENPLAY"9" 

560 G0SUB62B:IFJTHENPLAY"BAG":RETURNELSE 

FORK=8TO28:NEXTK:GOTO550 

578 '»»-(. *-►• tU9h 

5B0 GOSUB520 : FORI = 1T03: LOCATE 12.3*3" I :PR 

INTM$(I):NEXT:X=80:Y=44:Y1=44:Y2=92:A=0: 

B=24:G0SUB54B:MMY-Y1 )/B+1 : IFM=3THENGOSU 

B78BELSEG0SUB46B 

598 RETURN 

608 '%■}'•)■<*■ i/»">*3¥7' 

610 F0RI=8TO9:PUTSPRITEI. ( B . 289) :NEXT: RE 

TURN 

628 '*"-S:X)'" tlbim 

63B J=FNB«!KE=0) : KE = FNB : RETURN 

640 'l?fj3*YJ &■#*»*■( 

65B A=16+184»S:PUTSPRITE0. (A. 155) . 15.0:P 

UTSPRITE1 . (A. 168) .1 . 1 : FORI =1T02 : PUTSPRIT 

E1+I . (8*20B«(I-1).16B) .C(PL(I)) .PL(I)«3: 

NEXT:POKESHD297.0:POKE&HD298.0:GOSUB660: 

G0SUB6B8:RETURN 



660 •7.3?tm*>V 

670 F0RI=1T02:PUTSPRITE3*1. (96*4B«(I-1) . 

56) ,18.24*S(I) :NEXT:PUTSPRITE6. (115.56). 

IB. 21 :PUTSPRITE7. (96*48»S . 8B ) .10.21 :RETU 

RN 

688 '*-f*XM:> rtvMK7' 

698 PLAY"05A2","05G2":GOSUB7B8: RETURN 

700 '11 ftvt-ffa?; VSy?! 

71B IFPLAYI01THEN71BELSERETURN 

728 'PLAYi/»*t 

738 PLAY-T2B0V1 30L1 6". "T20BV 130": RETURN 

74B " 9-fD-l'*J7'' 

758 IFM<>2THENRETURNELSETT=TT*1 :PL(2)=T( 

TT):G0SUB76B:LOCATE15.9:PRINT"VS" ; TAB (23 

6) :" PASSWORD" ; TAB (78) : PRINTUSING't" : TT ; P 

L(1) : :PRINTFNB$(TT,PL(1) ) :F0R1=BT01 :I=-F 

NB:NEXT:IFFNA=1THENRETURN3B0ELSERETURN 

760 '9<totl*J 77«?<(-t.7i/'* 

770 GOSUB600:CLS: COLOR, 1 :F0RI=8T01 :A=PL< 

1+1 ) :PUTSPRITE2*I, 148* I »1 44. 64 ) .C( A) .A«3 

:NEXT:RETURN 

788 ' PASSWORD;:!?')^ 

798 GOSUB680:CLS : COLOR. 1 :A = USRIB) : ERASE A 

:A = 8 

800 FORI=0TO3:PUTSPRITEI . (80*24»I .88 ) . 15 

.24*A(I ) : NEXT: PUTS PRITE4. ( 8B»24«A . 1 04) .1 

5.0:8=FNA:A(A>=FNDIAIA> . B . 5 . 9) : A=FND< A . B 

.7.3) :G0SUB628 

81 IFJTHENA=( (A(BX7)«(A(1)<7)) :IFAANDV 

AL(STR$(A(2) )*STRJ(A(3) ) > =VAL ( FNBS ( A ( B ) . 

Ad) ) )THENPLAY"OBAG"ELSEPLAY"03E2" :G0T07 

9BELSE88B 

828 TT=A(0)-1 :PL(1 >=A(1 ) :M=2:LV<1 )=0:LV( 

2)=1 :RETURN 

838 'Bit-f SOUND 

84B S0UND6.23:S0UND7.247:S0UND8.16:S0UND 

11 . 16:SOUND12. H:SOUND13.13:FORI=BTO7B0 

: NEXT : FORI =BT05 : SOUNDI . : NEXT :S0UND7. 248 

:RETURN 

850 '»*jC»9 ■JO'JUZT.S, 



860 FOR1=1T015:A=I/2:COLOR=(I.A.A.A> :NEX 

T: RETURN 

870 'C«7:/»77M? J)7 

880 FOR I =0TO2: LOCATE 1 1 .A* I : PRINTAS : NEXT : 

RETURN 

890 •7.1°'i<V3 ^ZXZ'ft^') 

960 F0RI=ATOE:PUTSPRITEF.(I.B).C.D:NEXT: 

RETURN 

910 'J.T?<V°) 9iZ4f"> 

920 FORI = ITO209:PUTSPRITEA.(B.I) .C.D:NEX 

T:RETURN 

930 'ENDING 

940 G0SUB858 

958 CLM:G0SUB84B:J = 1 :A=1 : GOSUB390 : A$=" 

xxx " :A=17:GOSUB870: A$="xxxxxxxxx" :A 
=28:G0SUB87B:LOCATE15. 18: PRINT" 1" : LOCATE 
12.21 :PRINT"2xxxxx3" :PUTSPRITE2. (92. 144) 
,15.18:PUTSPRITE3. ( 14B . 144 ) ,9 .6 : FORI =BT0 
5B8B:NEXT:G = C(PL(1 ) ) :H = PL(1)»3 
960 PUTSPRITE1 . (0. 168) .G . H : FORJ=0TO1 :A=8 
:E=84*J»4B:B=152:C=15:D=B:F=B:G0SUB898:A 
=USR4(B) :I=144:A=2*J:B=92+J«52:C=15-J«6: 
D=28-J«12:GOSUB910:NEXT:PUTSPRITEB. (B.20 
9):A=B:E=116:B=168:C=G:D=H:F=1 :GOSUB890 : 
PUTSPRITE1 . . .Dtl :G0SUB848 
970 A=0:E=108:B=160:C=15:D=0:F=0:GOSUB89 
0:A = USR4(B) : 1 = 166 :A = 1 : 8=1 16: C = G : [>=H*2:G0 
SUB910:GOSUB6B8:FORI=eTO3BBB:NEXT:FORI=8 
T07:L0CATElB.5*I:PRINT"xxxxxxxxxxx" :NEXT 
: LOCATE 13. 8: PRINT-CAST" :A = USR1 (8) : FOR I =8 
TO5BB0:NEXT 

980 F0RJ=1T06:L0CATElB.8:PRINTLEFT$(Ni(J 
)*"xxxxxxxx" .11 ) ; :A=B:E=116:B=168:C=C( J) 
:D=J«3:F = B:G0SUB89B:PUTSPRITEB. . .D+l : FOR 
K=BTO2B80:NEXT:A=E : E =255 : G0SUBB9B : NEXT : L 
0CATE18:PRINT"xxxxENDxxxx" : FORI =8T01 5888 
:NEXT:A=USR2(B) :RETURN3BB 
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-rs#ur<e'tu nm<jxh<z\z&-D3cm-ii5z 

sis, mm;mm£-t. x-Tcisffi^tr/u, 
■ U7.KA 

10 CLEAR50B.£HO8BB:SCREEN1 .3 :WIDTH26 : COL 
OR 15.1 .1 :DEFINTA-Z:KEYOFF:A=&HD80 
20 PRINTSPC(2B9)"t*»WI)S»'>LA.CWS»l<l: l "i/«,n--7 
>-Iij8 US"H:l,Tl,i;W3L,S.l.i- 3 t!:>EJ:ii:TA.~ , *Sl>T'' JS 
v-ttnctlM* ItitlSt^T* limislltui . ML fBtti") 

UzkMfilo- ■ ■ TL7 1 SOA.fflSWt^TW-a/f'-nE- • - 

30 FORI = 0TO4:READDS:FORJ = 0TOn4:POKEA-U« 

1l5tJ.VAL("&H"+MID$(D$. J«2*l .2)) : NEXT J, I 

:DEFUSR=A:DEFUSR1=At72:DEFUSR2=A*145:DEF 

USR3=A+248:DEFUSR4=A+313:DEFUSR5=A*367 

40 H$»"lllU L ll"HU"lUl 

' L • • ' 1 1 - • 1 1 1 • 1 1 1 Idddddddd • • 'ddddxxxxxppc 
pxxpppppppppx! » !xxpppxxp<pxxp(pxptp(p*xp 
x'xxpxx; ;»:;:;;; ; t t t t txt t txxxt xxxt t t t t t t 
txxxxxtxt (txttt Ix* *h* *i><<<i.M,-fi.»'Li»-('t>Li»i,t' 

t« l J^.KIc:B*-/-K , -K»6«SnB3®aL' r Uj, r @j, 
cn KEY3, CHR$ (£54) *Hfffn«, r Hj BF I *- 



50 FORI=0TO9:READD$:FORJ=0TO149:POKE&HD3 
50*1.1 50-t J. ASC (MIDI (DS.Jtl . 1 ) ) :NEXT J . I : F 
ORI=0TO224:POKEiHD263+I . ASC ( MI D$ (MI , 1 +1 . 
1 ) ) :NEXT:F0RI-384TO727: V=VPEEK(I ) :VPOKEI 
. V0RV»2: NEXT: FORI =BT071 : RE ADD! : FORJ=0TO7 
60 VPOKEVAL ("&H"+MID$ID$. 1.2) )«8+J.VAL(" 
SH"tMIO$(D$. J«2*3.2) ) : NEXT J. I:FOR1=0TO16 
:VP0KEB197+I.VAL("&H"+MID$("5FF1F1F1F1F1 
F11111E1F8F1F1F1F1F111'.I»2*1 .2) ) :NEXT:F 
ORI = 0TO32:READDS:A$ = "":FORJ = 0TO31 :A$=A$» 
CHRS(VAL("&H"*MIO$(D$. J«2«l .2) ) ) :NEXT 
70 SPRITES! I)=A$:NEXT:A=SHD92F :FORI=0TO1 
:READDI:F0RJ=BT063:P0KEA*I»64tJ.VALl"&H" 
*MIDS(DI. J«2+l .2)) :NEXTJ,I:FORI=0TO3:REA 
DDi:FORJ=0TO127:M=ASCCMID$(D$. J+l .1 ) ) -64 
:P0KEA+129*]«256»J«2. -(M>13)-IM)21) 
80 P0KEA*13B*I«256-tJ»2.VAL("SH"tMIDJ("8B 
5F6B717F8FABAAB4BED6E3FBFEBD1D2E4B53687D 
FDlB3B5DA7FA".M»2t1 ,2 ) ) : NEXT J . I : DEFUSR6= 
A:DEFUSR7=A+25:UIDTH32:FORI=0TO2:PUTSPRI 
TEI.(80*I«32.55) . 1 4.29t I : LOCATE 11 . 12tl«2 
:PRINTMIDS("BCONTINUE START" .I«9+1 .9) 
90 NEXT:FORI=0TO1 : S=STICK ( 10RSTICK ( 1 ) :I 
FS-10RS=5THENL0CATE11 . 1 2" 1 S= 1 ) «2 : PRINT" 
": LOCATE 1 1 . 12-(S = 5 )«2 : PRINT'S" : I =0 : NEXTE 
LSEI=-STRIG(0)-STRIG11):NEXT:RUN"SNAIL-B 
.FDG" 



109 DATA3EB521231A1142D2B11ABB224BD2323F 
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05D0 0120B9EO42811A8B3E2BCD56B0C91E202128 
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080915C259O02A3FO223223FD216BC2A41D23E 

110 DATA2BCD4DB8B14BBB0915C272OB2A41O22B 
2241D23EFF3DC288OB1DC254D0C93E05211E1832 
44D22242D221B118223F023E183241022A3FD211 
45D2B1 1EBBCO59BBED5B3FD21B2145O201 1EB0CD 
5C002A3FD201200BB9223FD22A42D2B1B2B03E2B 
CD56BBB12B00B92242D23A41D23DC2A4DBB1FF 
120 DATAFFBBC2E7D0B1B2B3EO423A44D23DC296 
DBC93E17213618323F02224BD2B1BABB1142D2C0 
59BB2A40D2012000ED4201BABB545D2142D2CO5C 
B02A40D2012BBB093A3FD23DC2FDD021F61A010A 
003E20CB5600C9210420B153DU61CBA3OC24CD1 
3AF8F7CD4O8B230315C241D1C901B2B101B101 
130 DATA01 01 0202020281 01 01 01 01 0201 01 01 01 
0101010101B13EBO1127D421DF17ED5342D2323F 
D2224BD21148D2B6B52A42D27ED6B8232242D2ED 
5346D2215ED21 1 058B193DC29AO1 EDSB46D20E0 5 
7E231213BDC2A50185C286D12A4B021147D23AF8 
F7133DC2BAO13A3FD247BEU78D60DCAO5O179 



Sj (D3o«K?#«finrust. ;n6©j?B, keyi, chrs (i4/n, keys, chrs (iB0), 



140 DATAD611CAD5D11ACD4DBB2378D68DCAE6D1 

793DCAE6D11A3CCD4DBBED4344D2B1 1F8B09ED4B 

44D2783DCAB3D2790611CAB3D21AC6B2CD4DBB23 

783DCA14D2793DCA14D21AC6B3CD4D80ED4344D2 

811FB0ED42ED4B44D2138DC2C5D178811E080922 

4BD22A42D2B1BFBB89545D2A48D23DC277D1C9 

1 56 DATA77777777777777777777777777777777 

7777777777777777777777777777777777777777 

7777777777777777777777777777777777777777 

7777777777?77*77?7-(*'f<-f77rt77777;t<:/-r:)t:/ 

166 DATA77-M-(97i/*777)>"(4"r;<t!yi/!r7 , >"W7'M777 

t*?.<^z\ll^7>^■(!/^^■<7rr?^ : ?KZ■<*lv / ?1ll>^••>■<<^*77?b 

/■f»<7f»7TJ*X»7"f"f-f*777-a:/-f?-y7<t:t7';"f1:tt7 

17B DP,lH7'H'mSi;'r'>}\7V4'tH"J7t>Wj'(1'tJ-<3<* 

J4<49immiiHH4 1) (»M -fXTr5D3-f-f<^*)i/-f?»<D 

S-f-f*tW.I37-f-f , t73 7,<77a77-<7.'>l-?'./:)777,=:7)<t:i/3M7 

7-(-f^7=t37»-fC'-^t»7*7»»'>-f-fS»V377*'^7t:S777 

166 DATA777'5-r<»J;3779^7S7*77777=/-(<-(^-(D77 

17**^77777797, -f-(-(-f777*t 7677775779 7. ;<•(•(• 7.777 

*CJVsy»1-?t7Wm!/:*97?7»i*?l'Olil/'l7**W9t>*7?7 

»;07<:it.7t.77;U7,9i/77777tttt72727t;W-a'f77 

1 96 DATA*M»*Ct*72327l7;<'f"f"f77j!-r7.'rtl\31 , t0l.V 

7-nt-Ht777-f*7-<l7».'l3ll,'J7l7"f-fl-*77*I'7'(77tt.01 , 1. 

7*»7t7t77<*l-r77253'527M7"./zh77-<*l777371'73 

7»-(7,<T77»7**7*737l/7377-(I-f9;3Tm-f#l93b:, 

236 DATAl/3770-f;-f31]-f,f-(-('tl»3 , }l/7377's#'Mt3*H 

-f'H773?t737?6l!H'737"('77072'7352?7*>(:)*737.f 

^7H»7tVol'f77l\^I» / '37-fJ»7 , 77«.'l3«.'/7t)-fli/-r<37< 

!/*7*7V1.D1.t7777-U-<:j7<:/7It3723277*»7-f-f-a7 

216 DATA7-f7?**77202779'>:/-f-ft>7a-a7t61:7*2V7 

t9l!<f1;;W7a-f>l9*',*7l,'Jt7-f:/?t!t';!*7I]7t**777t5t7 

7a>^7-f / 77»»t»-*7>77727-('fT^ij/9701;ft!»/'a7773» 

7<S-fji-f77Il7rhit*77773»V9j!t:X<D7iI»?ya37777 

226 DATA3»<-fii7)i777I)921!a777777*Xi/)!>)i-f37I)h 

>V3777*'f7il-f7?X)!-r77»l\)!y77»-f6t?»-fX»j!}I77Tj-f 

><77^*^<7S-f<7;ft77Il-f^-f*I^tl777*-f'fS^yi»*7»-( 

•fO's7?1>777<<?tt7lM7;tH'f"f7'77e)<:iI-fM,'-C'a:/7 

236 DATAD-f-('>;/t'sW7E1:M-f*"f-r£/7»"f7'7'('7*t:*l]!::* 

7"f*JH"f'f777.»;'-f7tt**tX's-f7*7**77<;U'f*e7**71: 

7-f7i:i**77'f-f,f-<y's)l**et:7;/:>X7*77?-<,W-f-f7t!7I*.E 

7t>777J13777-r-f*l7C377Cy"»i/*t7777ti/-f>»/'y7'» 

246 DATAy'-f777l777777*77l779-/-f 77*7137777 

7777777777777777777777777777777777777777 

7777777777777777777777777777777777777777 

77777777777777777777777777777777777777 

25B 0ATA28871F3F1B3112B817.29EBF8FCD8684 

C1BE8.2A3737BB34BFB9BE1E.2BECEC966CDBBB7 

078.2C87BA11153A3B3218.2DEBFBF8F85CBC4C1 

8.2E1F3D396F5B5B38BF .2FF8BC9CF6DADA1CFB 

266 DATA3BBBBF9FAABBFBF9AA.3CBBBF9FAA6BF 

BF9AA.3DBBBF9FAA00FBF9AA.3E08BF9FAA80F8F 

9AA . 5C7FC1 A995A995A985 . 5DFE83A995A99589A 

1 .5EFF85A995A99581FF . 5FFFA1 8995A99581FF 

276 DATA6608BBB4B0BBBB6BBB.61BBBBBBBBBBB 

8 0eBB.62BB8B8BB8BB200000. 6300 00040000000 

BBB.64B2B7BF1F1E3F3F7F .65BBBB9BB8DC7C7EB 

E.667777EFEFDF7F3FBF.67BEDFEFFEFCF8FB8B 

286 DATA68AB56AE56AB57A857 . 69EAF56A756AF 

51AE0.6AAF6BDA43BAB774B7.6BF6B55AC35DE12 

EEB.6CC9E3EFCC19C3F7F7.6D83397C7E3C81E7F 

7.6EF3FBFB71849FDFDC.6FE3C9DD9C3E7C3D19 

298 DATA7BFE7FBF5FEEF5FBF7.71FE7FBF5FEEF 

5FBF7.72EFDFBF5FEEF5FBFD.73EFDFBF5FEEF5F 

8FD.747EFE7D7BB58D2EDF .75BFF6FAFCFDFEFE3 

1 ,760F9F9F6F4CB37B7D,778FDFBF3F0FEEFBF7 

3BB DATA781F7BCB8B8BCBFB9F.79F8BEB361B16 

3BFF9 . 7A84C4F49F90D0701 F , 7B1 1 1 31 FFD8S878 

EF8.7CFFFCFBF7EFC18CBF.70B7F9FDFEFEFE7E7 

4.7E3F7F7FBB7F7F7F0B.7F32B2AE1DBBB7AF1F 

31 B DATAA8C9E3EFCC19C3F7F7.A983397C7E3C8 

1E7F7.AAF3FBFB71B49F0FDC.ABE3C9DD9C3E7C3 

D19.ACC9E3EFCC19C3F7F7.AD83397C7E3C81E7F 

7.AEF3FBFB71B49F0FDC.AFE3C90D9C3E7C3D19 

326 DATA8BB63F7F7B6B6B6B6B.4BB6FCFEBE666 

6B6B6.SB6B6B6B6B7B7F3FBB,81B6B6B606BEFEF 

CBB.826B6B6B6B6B686B6B. 83B6B6B6B68606B6B 

6,84BBFFFFBBBBBBBBBB.BSBBBBBBBBBBFFFFB8 

336 DATA25BBae8888BB82e984.26lel81B10 1BB 

81 BBB , 27686E686C686E686B , 984B687B787B6B4 

0BB.ABBBBBB8FE7C381BB8.A78B4428FE2844BBe 

8 .23BBBBB8FFBBBBBBB8 . A6CCFCFCFCCCCCCCBB 

34B DATA138F9F8D98424B4FDE67BB27BF3318B8 

E8FBF8B8884BBBFB78E8CBBBBB888866 

356 DATA0B1F8F9D8882884F5E6F816621 183888 

E8FBF8B8884BBBFB78EB8BBBB8818 3BE 

36B DATABBBe8B82e7eOe7BBB1787FBB8BBCB7BE 

B88B88487BB8E6B0861B38F8F8FC7F1E 

37B DATA88B8 8B8267BDB7BBB1187E618E876EB8 

B888B84878BBEB8B8B1B78F8F87C7C38 

388 DATABBBBBBBBBBBBBB 88 1C8F3E8AB 1880006 

00BB80BB8B0000001B16CBE659582F5C 

398 DATABB6C742CDEFE3D13BDBBB6B 180880008 

572B1F6B14E768B7B752CC8E88 0B8B8B 

4B8 DATA02030301610020AB54A855AB79C68E7E 

00B080DBDC9E4E576727BB93131BBA8A 

416 DATABAF57BD5B6E916EF907EFE3D433F5C2D 

88CCE4E444A8F67A36BB8486B26AF3EA 

428 DATAB88B0BBBB001 0303000 505048F4E 3036 

0105665BO7A9566EB3563DB38EB46B3C 



436 DATA2C1A176B1C1E1EBDB3B1BBB0B1B71F0A 

42FA35D5E673BD4EA7D3E81CFBC8B880 

446 DATA2B58ABF6B3D2D1A64FEEDE0AB1366C4C 

8B88800080F8F87088D86C687B5B1B7B 

456 OATAE8C193FE819DB5B8B8C8EB701C0E030B 

BB6B8B6B2B0BEBE8187C3C18B41C3E25 

466 DATAF85D2B5327161F2C3B162573526BBB06 

187DF7AF1DF3BE5E0DD3AFBFAF36B97F 

478 DATA42AD773E2B4BB800B8BBBB0008BB8BBB 

FF7F7FFF 3900000000 00 000 10001 8880 

486 DATA9BFCF1FBE69D62F9F40E2AE675C337EB 

1FF4AA54A8 5BA040000000BBBB542A55 

496 DATAF6F9FEFEFEFEEC54283810A8E0F 06020 

AA55BAB1BBBB 888 868 60 0000 00000 080 

506 DATA8B8B80000 00 000000800086088 BB BBB 8 

88888000 030 10303B21C0F000D182C75 

518 DATAB0BBBBB063B2B182A6CC5828324C860B 

295BE5EB6A6D6D6E6D5E1D307BF7CB18 

52B DATA0000B8BB8B88C1E1923CF38DEE758AE7 

2CBC321C58BBBBC8D8DB5B70B0D83BB0 

530 DATAABACF5D3EB6BDDBD3EBFBFBFBFBEB9AB 

60E06060A8ABC8CBE8687BB8B87C8FC0 

540 DATA00B8B58 2462D19173A35F53A3C3B1B3D 

848870B885BD7E4DA5FEBFOBCC62BE54 

558 DATA5E8F878B1 1 BBB 1 8B8B000000B40300B8 

E671ACDFE7F83FC7B8B0DB671FFF7EB1 

568 DATABB8B8880BB8BCB8BB8862D138EBF8B8 8 

8BB888 88BB0B88BBB8F8BC8E8687B387 

578 DATA3C0B659E63F830CAF737DBE8F7EF16F8 

870FDE3E EC 1 BF8E0E040B0800B 000008 

586 DATA7F866F102FB20100B6B363B1B2860B88 

EB34F91AE70B25A873FEDE54AA707028 

5 96 OATA8B00800B88 88BB8888686BB888 8BB88 8 

8 1833BBE7F4C1 81 88888888808086088 

6B6 0ATAB82448F8FDFEED1FBBB7B7BFB92F77FB 

621D33B1B307EEFC7A81B679C4B4AA4F 

610 DATAE881B08B88BB8B028C8818101818BF8 7 

D9D4E87C4A3C3E1DB41C3A1070A8C0B8 

628 DATAB6FEC3B84E6321311B1690E89E0900BB 

eBBB88C86e2B3B9B988C84425AE543el 

638 DATABBB883B086003F7E7039DE6F83617F3F 

0708C6010E206EAF635DBD5EABCCCCAC 

646 DATA742424247700181880BFDFDFEB797B3B 

AEA8AC484E8B307838DDEDEE06868783 

658 DATAEB96F3AB9BBB7979B1FDFDFDB 131 7979 

8B0BC00000B0808080BCBFBC8086FEFE 

666 DATA070A1 1 1 53A30321 81 F3D396F5B5B380F 

E0F0F8F85C0C4C18F8BC9CF6DAOA1CF0 

676 DATAF3219FFD1156D96105eeEDB83EC3329F 

FD2 15E0922ABFDFBC9F321 56091 19F FOB 185B8E0 

BBFBC98BB80B88BBBB8BB8F5C5O5E52A5BD95E23 

563E01CD93083E08 

686 0ATA5ACD93BB235E23563E83CD93B63EB25A 

CD93BB2B2B283A5OO93O281B3EB0325OD9232323 

2301B0 00ED42288 521BBB818B189225BD918B332 

5DD9E1D1C1F1C9B6 

698 DATATaMOTOnQTBMQTaMOTBnQTaMQTfflMQTaMO 

TaKOTaKOTajnTaKOTBMQTaMQTaMQTaMQTariOTaMO 

TanOT8MOTBnOTaHOTBMOTaMOTaKOTaKOT8JMTaKO 

TBMOTBMQTSMOTBMa 

786 DATATAMATAMATBMCTDMETEMETEMGTFMETFME 

TDKDTDKDTOJOTDKDTCMCTCMCTCMCTCMCTAMATAMA 

TBMCTDMETEMETEMGTFMETFMETDKDTDKDTDJDTDKD 

TAMATAMATAMATAMA 

716 DATAGUJUMYHURUMYJUGYHVKVMYNVSVNYKVHY 

IWLUMYOWSUOYLWIYJXMXPZRXTXPZMXITGUJUMYQU 

RUMYJUGYHVKVMYNVSVNYKVHYIULUMYOWSWOYLWIY 

JXMXPZRXTXPZMXIT 

726 DATARUMURYMURUMYRUMYRVOVRYOVRVOYRVDY 

PWHWPYMWPUMYPUMYQXMXQZMXQXMZQXMTRUMURYMU 

RUMYRUMYRVOVRYOVRVOYRVOYPWMUPYMUPWMYPWMY 

axMxazMxaxtizaxMT 

■ U7.KB 

yy-OV^: SNA I L-B. FDG 

16 CLEAR1BB8 . SHD8B0 : DEF INTA-Z : DIMM ( 47 ) ,M 

$(26) ,I$(24) .1(24) .E$(20) .EHI20) .EPI2B) . 

EC (28) .EM (28 I >EU(28) .EG (28 I .EE (26) .EL (28 

) .F<22) :DEFFNB=ASC(MIM(IS.CO, 1 ) )-65 :ONS 

TOPG0SUB1368:STOPON 

20 F0RI=6T026:READM< I) .M$( I) :NEXT:F0RI=2 

7T047:READM(I) : NEXT : FOR! =8T024 : READ IS ( I ) 

.1(1) :NEXT:FORI=0TO20:READE$( I ) .EH (I ) .EP 

(I).EC(I).EM(I).EU(I).EG(I).EE(I).EL(I): 

NEXT:E$=CHR$(27) : UA=3 :G0SUB81 6 : VDP ( 1 )=VP 

P(1 )AND254:IFVPEEK(6539) >32THEN7B 

38 CLS:PRINTE$"Y. .01* ?(H>3" : F0RI=BT01 :G0 

SUB680:Z = Z-MS=7ANDZ>8)-(S = 3ANDZ<3) :LDCAT 

E15*Z, 11 :PRINT" B " : V=VPEEK (6S44tZ ) t (S=1 

)-(S=5):V=V-120«((V=l34)-(V=255) )-62«( (V 

=160) -(V=221 ) I :VP0KE6544*Z,V: I=-G:FORJ=B 

T036:NEXTJ.I 

48 FOR I =BT03:ZJ=Z$»CHRS(VPEEK( 6544*1 > + 1 ) 

: NEXT : CLS : G0SUB648 : M$ = "S3B ! *S7-<lltt» r " ♦ Z$t 

"0271,7»CBS! !ufli!ffSL*ft'.0S^*tt^7?" :G0SUB72 

6:G0SUB73B:U=USR5<5) :FORI=0TD1 :PUTSPRITE 

I. (120.87) , 5-U«1B. I»2:NEXT:G0SUB64B 

58 M$ = "<j»«P"*ZS*"4''.lfBS*7lS? r BC5 , ('!TB!:! ! ^(l 

o»v«& s ia26mau*>$&ti < irfntt. i < ~»> ! **«m» i -sb 

»*S#?IHt#B r ! ! ! l@it&!@)zS*'.t)t*>mitzS*'Ml,1')at. 
tl ! ! SA&lii&t I?7(1*S» •"" : G0SUB72B : GOSUB730 : M$ 
= "0»i"*Z$+"(!!»*U»l»21 17&7L'7&»7^I ! SA&Kt&tlJ 
O»»*tti8fS7 i 7?":GOSUB720:GOSUB730 




60 I$=-AAAAAAAA":GO=108:LV=1 :MH=168:MM=2 

8:AP=15:AC=12:UP=5:G0T088 

76 CLS:OPEN"(,J»t)DA"FORINPUTAS#l :INPUT*1. 

MH.MM.AP.AC.G0.EX.LV,UP.E.UP.UA:F0RI=6T0 

22: INPUTtl ,F (I ) : NEXT: FORI =1T08: INPUTtl , Q 

(I) :NEXT:CL0SEtl:0PEN-L,5T6IT"F0RINPUTAS# 

1: INPUT* 1 . ZJ: CLOSE* 1 : GOSUB850 : I$=MID$( Z$ 

.1.8) :Z$-MIDS(Z$.9.4) 

86 C*RND(-TIME> : AD* 1879: HP=MH :MP"MM:GOSU 

B788:GOSUB860 

98 F=1-F:PUTSPRITEB. ( 1 28 .87 ) . 5 . F :PUTSPRI 

TE1 . ( 128 .87) . 15.2+F :GOSUB68B: IFSMOD2=8TH 

ENIFGTHEN26BELSEFORI=0TO258:NEXT:GOTO98£ 

LSEV=VPEEK(6511*( (S=7)-(S=3))«2*((S=1)-( 

S=5)>«64) 

IBB ONINSTR("( , ;¥ , dhlptxUi.".CHRS(V) I GOT 

012B. 128. 11 8. 258. 248. 11 8. 1848. 1 IB. 258. 24 

0.116.258.248,118 

11B FORI=BTO25B:NEXT:GOTO90 

120 YA=AD*(S=7)-(S=3)*1BB»( (S-1)-(S«5)>: 

FORI=0TO47:IFM(IX>YATHENNEXT:GOTO1B98EL 

SEY = I :I=47:NEXT:G0SUB64B:IFY<27THENM$="r 

j-+M$(Y) :G0SUB72B:IFY<21THEN23BELSEQ=ASC 

(MID$("CNJ00R-.Y-2B.1 ) ) -65 : G0SUB73B : GOSU 

B4 58:F(Y-17)=1 :G0SUB858 : GQSUB78 :G0T09B 

138 0NY-26G0T0148.148. 14B . 1 48 . 1 78 . 1 78 . 1 7 

0.1 78.1 78. 178. 170. 170. 178. 170. 890. 920. 94 

0. 968. 97B.99B. 1820 

148 G0SUB668:M$="-rjSi0!»»&»t&e r iCaMS"tST 

RS( (Y-26)»15*36)*"7&7l/7&»! ! ! !C5*(!«S ! »Uhi 

»C)3*1<*a":GOSUB72B:G0SUB74B:IFWH = aTHEN16 

0ELSEIFGO< IY-26)«15 + 25THENM$= - rj(!t!*-Hie#S! 

»»l)*&?lC7«StS8 r ":GQSUB720:GOTO16B 

158 M$="rjt&[):*Si»tiO&JB!, r ":GOSUB720:GOS 

UB758:GOSUB750:GO=GO-(Y-26)«15-2S:GOSUB7 

68 

160 M$="<J*Stt/r^^*!»*7tt»S*t• , '" :GOSUB720:G 

0T023B 

178 M$="i-j77ffl?«7* T , !<r&iiiuj&;,ai&?^**a - : gosu 

B72B:UI = 185:UH = 197:G0SUB65B:PRINTE$"Y' :lt 

7-EI-Y) ;7i":UI=25B:UH=B:G0SUB69B: IFUH=BT 

HENG0T016BELSEIFUH=1THEN288ELSEnS="<jC»» 

3fflt7S5&i)llltS,ti#B - :GOSUB72B:G0SUB758:G0SUB 

758:G0SUB78B:IFCO=BTHENG0SUB64B:G0TO168 

188 G0SUB64B:IFI ( FNB ) =BTHENMt = "i-jB5«*7»« 

^;»!)-7<»?* r ":G0SUB72B:G0T0168ELSER=I (FNB) 

«7/1B:GOSUB82B:M$=--rj--U$(FNB)+"i&tiO) r "+R 

S*~1&7bttlf :G0SUB72B:M$ = "! !Ci*8«& !4«f itt. 

1i.*«B- :GOSUB720:GOSUB74B: IFUH = BTHEN 160EL 

SEM$=-Yj):8«i*'7<I , )Tt^SS8,<*f> r ":GOSUB720 

19B IFC0=ETHENE = B:UP=,fl:G0T019BELSEG0SU88 

3B:GO=G0tR:G0=G0-(258BB-GO)»(GO>25BBB) :G 

OTO160 

288 R$="IGHIHFFEKEPODKPIKJRTUWUPSVXSVY": 

MS="^j«&3« ! »f }*et»EJ*e*8" : G0SUB72B : WI=33 

:UH = 272:GOSUB658:F0RI"-2TOB:R=ASC(riI0$(R 

$. (Y-38)«3»I.l ))-65:M$=I$(R) :G0SUB77B:L0 

CATE12.7tI«2:PRINTUSING"#*##":I(R):NEXT: 

WI=5B:WH=139:G0SUB658 

218 PRINTE$"Y#3"USING"G0LD*#***":G0:UI=9 

8:UH=6:G0SUB69B:IFUH=BTHEN16BELSER=ASC(M 

ID$(R$. (Y-3B)«3+WH-3.1) )-65 

228 IFGO<I(R)THENM$ = -<jB4«»S»»!»«0)t&SlCti 

«*t&»r-:G0SUB72B:GOTO16BELSEIFINSTR(I$.- 

A-)=BTHENM$ = -<j«tl*«S«&!Ul:SBH?^*S7SVt:»f» r 

" :GOSUB72B:GOT016BELSEM$="<j-tI$(R)*"4:&l! 

»> r l.>5*&ejJ&l8,7»t! r " :G0SUB72B:G0=G0-I(R) :MI 

D$(I$.INSTR(I$,"A").l )=CHR$(65 + R) : GOT0 16 

6 

238 GOSUB730:S=0:GOSUB700:GOTO9» 

246 IFRND(1X.B8THENG0SUB7BB:G0SUB44B:S = 

B:G0SUB788:G0T09e 

256 GOSUB760:GOTO98 

268 GOSUB66B:UI=184:UH=263:GOSUB658:FORI 

=BT05:L0CATE26.6+I:PRINTMIDS(-X X M< 

X W>1 XUii-iL". I«4+1 .4) :NEXT:U1=249:UH = 

B:GOSUB698:IFWH=8THENS=8:GOSUB7BB:GOT09B 

ELSEONUHGOSUB278.4B8.43B:GOSUB730:S=0:GO 

SUB708:GOTO98 

278 G0SUB78B:IFCO=BTHENIFBATHENPRINTES"Y 

X "E$"J":G0SUB648:RETURN468ELSES=B:G0SUB 

78B:RETURN9BELSEIFFNB<8ANDBA=BTHENIFCO=E 

THENE = B:UP = B:M$="B»AS*!tt(»8t*t? r ":GOSUB72 

B:RETURNELSEE=C0:MS=.I$(FNB)+"»!B*»8tS r ": 

G0SUB72B:WP=ASC(MIDS("-j>7l'}lv" .FNB.1 ) ) -9 

9:RETURN 

288 M$=I$(FNB)+"«!7*BS r -:G0SUB728:IFBATH 

EN0NFNBG0T039B . 398 . 398 . 39B . 398 . 396 . 39B . 2 

98 . 298 . 3BB . 398 . 398 . 398 .398. 39B . 39B , 350 . 3 

50.350.358.35B.35B.35B.35BELSEONFNB-7GOT 

029B . 298 . 398 .316. 328 . 398 . 398 . 346 . 398 .358 

.35B.39B.39B.398.398.39B.390 

290 HP=HP-HB0-9899«(FNB=9) :M$=ZJ-»"ttS7S->tt 

B! S^lttS r -:GOSU8728:GOSUB838: IFHP>MHTHEN 

HP=MH: RETURN ELS ERETURN 

308 M$=It(FNB)+"«!*~SS»65cHiS'":G0SUB72B: 

G0SUB83B:C1=2:RETURN 

318 IFAD01962THEN39BELSEF(B)=1 :GOSUB858 

:M$ = -»*»!tf£tt!m•" :S0UND12.99:S0UND6.31 :S 

OUND13.B:PRINTES , Y-/'a"E$"Y./bc-:G0SUB72 

8:G0SUB838:RETURN 



IS 

< 



61 



32B IFAD< >2981THEN390ELSEM$ = "fc1*8;!fcltt;e&J8 

! *t «»?=)?" :G0SUB72B:G0SUB73B:S =7 :G0SUB7B 

B:F (221=1 :GOSUB85B:GOSUB788:F(21 1=1 :SOSU 

B858:S=8 :G0SUB78B 

33B G0SUB64B:M$ = -<-j4S*UX&*a7tl<&''*!Ili?SS& 

!»»Ji£Sl ! !ttt!(I« r }&?**l<tt70BSl, J >S8»(U! !!!! 1*8. 

<^tXl^.fttllt,iB*, r >.$lt.■mtlz• ! ! !/***»(»! t&»l.i&i,»SS 

8;tnM*8utt'" :G0SUB72B:MID$(I$. INSTR( I$," ' 

M") .1 )="B":G0T023B 

34B S0UND12.8:S0UND6.9:S0UND13.15:U=USR1 

(B) : BU= 1 :G0SUB71B:AD=1B79:G0SUB7B8:G0SUB 

83B:RETURN90 

35B P = ASClnlD$("xSo">*<TX".FNB-16. 1) )-99: 

IFMP<PTHENMJ = "N0*8S5*W! r " : G0SUB72B : CO=B : 

RETURNELSEMP=MP-P:G0SUB846: IFC3=1 THENMS = 

"»tt l1&l■mu~■z1&^t1?,>:'>tl^ • : gosub72b: return 

ELSEIFFNB<19THENHP=HP*38B-9699«(FNB=18) : 
M$ = Z$*-|lSil->irU!?7~tt*S r " :G0SUB72BELSE378 
36B IFHP>MHTHENHP=MH:RETURNELSERETURN 
37B IFFNB=24THENC5=1 : I1$ = Z$*"I1 ! 35;&< l^lfll ! 
3I)&^»aS«'":G0SUB72B:RETURNELSEIFRND( 1 ) >( 
Ert(ai/18)0R<Q>18ANDFNB>21 ) THENM$="T»t ! ■+ 
ES(Q)+"»B!<*CBSS'" :GOSUB728:RETURNELSEIF 
FNB< 22THENM$=ES ( Q I ♦ "« ! u»«»TS - 5*&ir'J* ' " : GO 
SUB72B:DA = 2.2MFNB-17)«16+RND<1 )«17:RETU 
RN 

388 IFFNB = 22THENM$ = ES(a>t"*!J>»')*5'- :C2-1 
:GOSUB72B:RETURNELSErH = EI(Q)-t"B!?&;;'M«*'NS 
?8itS'" :C4=1 :G0SUB728: RETURN 
39B MS = " U»t !«">(:*. r ":G0SUB72B: RETURN 
48 B G0SUB64B:H=B:IFVPEEK(651 1 )=124THENM$ 
= Z$+"»!58")U&4*u.:t;r- :GOSUB726 : FORI =BT09: I 
FA$< >MIDS("D3E7D6B6D7A6D7BA04E5D46CD5BAD 
4BBD7DED77B" .1*4+1 . 4) THENNEXTELSEH=It 1 :I 
=9:NEXT:U=ASC(MIDJ("LGPKCPUHUP".H.1 ) ) -65 
:MJ = "f&0°>(St^«'" :G0T042B 

41 B IFAD=1687THENW=13:M$="*8*ni: ; «'" :GOTO 
42BELSEIFAD=1614THENM$="?8«i«»!7&?**8l>S*t» 
r 1t1kk»1i* r " :GOSUB72B: F ( 3 ) = 1 : GOSUB858 : RET 
URNELSEM$ = "C»l»!l.>5»** r ":G0SUB72B: RETURN 
42B M$="a*»!"*IS<U)*M$:G0SUB728:IFINSTR( 
1$. " A" >=BTHENM$ = "t*?!J?. 718^**11* "ft*?* 1 "" :G 
OSUB72B:RETURNELSEn$=I$(U) ♦ "» ! *»M*t* r " : 
GOSUB72B:MIDJ(IS.INSTR(IS."A") . 1)«CHRS(6 
5*W> :IFH=BTHENRETURNELSEFIH*18)=1 :GOSUB8 
58: RETURN 

438 G0SUB648:PRlNTES"Y3#a i H'l 1 1 — H F 

1 l*Hi":F0RI=BTO1:G0SUB68B:WA=UA+(S=7 

ANDWA>B)-(S=3ANDWA<6) : LOCATE 3*UA«3 . 18: PR 

INT" B " :I = -G-T:NEXT:S=B:G0SUB78B:RE 

TURN9B 

44B C6=>1 :IFV = 168THENQ = ASC(MIDS("0(1S" . RND 

d )«3*1 .1 >)-65ELSE0=AD*4:Q=ASC(MID$("GIK 

FINABEAABGHLGKLCEMBEEHLPHPQDFMCDM" . 1*3«( 

-IOMOD18B>2B)-(OI>IOD1B6>4B) - ( OMODl 8B >65 ) ) 

*12»(-(0*1BB>2B)-(0»1 B8>4fl) )*RND( 1 )«3. 1) 

)-65 

458 G0SUB81B:V0P(1 ) = VDP ( 1 )OR1 : U = USR1 I 8 ) : 

U = USR7(B) :G0SUB86B:BA=1 :UI =35 :UH=1 54 :C1= 

B:C2=8:C3=B:C4=B:C5=B:G0SUB658:G0SUB798: 

G0SUB64B:GOSUB8BB:EH=EH(a> :MS=ES (Q ) ♦"*&! 

1">44S'" :GOSUB72B:IFRND(1 )< . B5THENHS="fc<tt 

1*tiZ*z&< '■:G0SUB72B:G0T054B 

46B UI=24B:UH=263:G0SUB65B:F0RI=8T06:L0C 

ATE26.9-U:PRINTMIDS("K6#iX X to< X Ctti 

",I«4+1 .4) ^EXT^OR^BTO^MI^-^E't&a" :GO 

SUB728:WI=313:WH=8:G0SUB69B:1=WH:NEXT: DA 

"I 

47B IFWH=2THENGOSUB27B:GOSUB75B:GOSUB75B 

:PRINTE$"YX "ES"J" :G0SUB64B: IFCOTHEN5BBE 

LSE46B 

488 IFWH=3THENM$=ZS»"U!J6;:&S&*S , ":G0SUB72 

8: IFRNDI1K .7ANDC6THEN538ELSEM$ = "T*T !*A.i 

Jk3?'":GOSUB72B:GOT054BELSEPl$ = Z$*"tt!S*;S 

< '" :GOSUB72B:DA=( (AP*UP)» I C5+ 1 ) >-EC(0)+R 

ND(1 )«( <AP*UP)*9*1 ) :DA=DA«-IDA>0) 

49B IFRNDI 1 )< .82THENMS = "**>»(! !«;:8< ":G0 

SUB728:DA=DA«2*RND(1 )»<AP*8+1 )ELSEIFDA=B 

ORRND11 X .B1THENDA = 8:HI = -6t , JSt?^&«l.'*K , )3 

E7'" :GOSUB72B 

5BB IFDA=BTHEN54BELSER=DA:G0SUB828:S0UND 

12.2B:SOUND6. 1 5 :S0UND13 . 8 :F0RI=BT088 :NEX 

T:S0UND6.25:S0UND13.B:F0RI=BT04:GaSUB81B 

: G0SUB8BB: NEXT :M$ = E$< (])*"»! "♦RSt"UHt?7,& 

«t'SS$'" :GOSUB72B:EH=EH-DA;IFEH>BTHEN548 

518 IFQ=19THEN0=28:EH=9999:M.$ = "?8?*»l/(nii 

*»»T? ' ■ : G0SUB72B : G0SUB8BB : G0T054BELSEG0S 

UB81 B :«$=£$ (0 >♦"«!*»»*'" :G0SUB72B:R=EE(Q 

1 :G0SUB82B:W$=";7^S^"*RJ«"»!":R=EG(Q) :G0 

SUB82B:MS = MJtR$*"t8?l.t8«t»o?S r ":GOSUB726 

:G0=G0*EG(Cl> :IFG0>2588BTHENG0=258B8 

528 EX=EX*EE(Q):EX=EX- ( 228BB-EX1* ( EX>22B 

BB) : IFEX> = UPTHENM$ = Z$*"!):D*&1/*&!U*&BS'" : 

GOSUB88fl:MH=MH+RND( 1 ) « ( MH¥6 ) +RND < 1 )«26*4 

B:AP=AP*(AP*8)*RND(1 )«4*2:AC=AC*(AC*8)*R 

ND(1)«3 + 2:LV = LV-d:UP = UP«1.5 + 9-LV:EX = B 

538 G0SUB738:G0SUB818:C6=8:C3=B:BA=B:VDP 

( 1 )-VDP(1 )AND254:U=USR7(B) : IFQ<2BTHENGOS 

UB668:RETURNELSESOUN07. 191 : SOUNDS . 6 : SOUN 

D9.B:RETURN 



548 GOSUB79B : t>A=B : I FC2= 1 THEN I FRND ( 1 )< . 3T 

HENMS = ES<Q)t"U!l*LI>tS'":C2 = 8:G0SUB72e:G0 

T068BELSEtt$ = EJ(0)t"H!«)»ilite : >tl=i=>=i" :G0SUB728 

:G0T06BB 

55B IFRNDI 1 )< . 4THENM$ = E$ ( Q ) +"tt ! 5*;&< '" :G 

0SUB726:DA=EP(Q)-AC*RND(1)»(EP(Q)*'9) :IFD 

A<10RRND(1 X . 81THENDA = B:M$ = "6t'?8t?;*8«.*; 

EV" :G0SUB72B:G0T068BELSE6BB 

56B IFCK6ANDRNDI 1 1< . 4THENM$ = E$ (Q) ♦"(MMU 

Sl*Tt<$'" :G0SUB72B:DA=22+Q«6+RND( 1 )«11 :G 

0T06BBELSEIFQ*4=2ANDRND( 1 )< . 4THENMJ=ES ( 

H"U !STtH^)!*S«j!SfflS'" : G0SUB72B : G0T059BELS 

EIF0>15ANDRND( 1 )< . 5THENM$=ES ( D )+"0 !~>S< • 

tm'":GOSUB728:DA=(0-1B)«7B-RND(1 )»99:G0 

T06BB 

578 IFEU(G>=BTHENM$=E$(QX"U!"*Z$*"»!*t!7 

W" : G0SUB72B : DA = E P (<))•. 7* RND (1 )«6:G0T06 

BBELSEMS = E$(())+"W!"-fMID$("l-S7t H.tH * 

nl\>*lS>Vkt i\i 'J7.77S *n.7)«.-rt" .EU(Q)»7-6.7 

>+"*!BEJ>V" :G0SUB72B:G0SUB84B:IFC4=1THEN 

M$="t*t ! t&*««U^i(tS?«')?i:9(t ' " : G0SUB72B : GOT 

06BB 

588 IFRNDd )< . 4THENP1$ = "T»» 1 " +ZS»" »0< *1Z*S) 

*'":G0SUB72B:G0T06BBELSEIFEU(QX4THENM$ = 

■l'» ; ii*TS9*S!"*Z$t"i.#BS , ":G0SUB72B:DA=2.2 

A (EU(Q)*1)«16+RND(1 )«17:G0T06B8ELSEIFEU( 

0!=5THENMS=ZI+"l»*&j;'MlfBl^*?&J»iS'":GOSUB7 

2B:C3=1 :G0T06BB 

598 IFEUlQ)=6THENMt = "H(!SSIli*5S5"tZt*"i.71b 

it":G0SUB72B:DA=HP-HP*2ELSEIFCl=2THENM$ = 

"T»t!t*&t?t!?t<:II)»?l: ; 5'":GOSUB728ELSEM$=Z$t 

"U!J)«Stt*SS?? : ?":G0SUB72B:C1 = l :G0SUB79B 

6BB IFDA>BTHENS0UND12.2B:S0UND6.25:S0UN0 

13.B:F0RI=BT088:NEXT:SaUND6.16:S0UND13.fl 

: FORI =BT09:SETADJUST( RND (1 )»11-5.RND(1)» 

11-5) :NEXT:SETADJUST(8.8) : HP=HP-DA: R=OA : 

GOSUB82B:MI=Z$ + "0!"♦R$*"tl!fKt77S•*iS , " :G 

0SUB72B : IFHP< 1THEN62BELSEG0SUB79B 

61 B I FC1 = 1 THEN IFRNDd X . 5THENM$ = ZI* "CIIHHS 

Bt=.(l9=i?":G0SUB728:GOT054eELSEM$ = Z$t"U!t». 

L*?S'-:C1=B:G0SU872B:G0T054BELSE46B 

62B HP=B:G0SUB79B:M$ = Z$ + "U!T«:&»Mgs^? _ : 

GOSUB72B:G0SUB81B:U=USR7(B) : PL AY" VI 5L 405 

D2AGFEFEL8DD-D1D104D1R2" , "V14R1 R1 R4L8040 

4FAFDE-4GB-GE-05004AGG-03G-1":C6=B:C3=B: 

BA=B:VDP( 1 1=VDP( 1 1AND254 : HP=MH :MP=MM:GO= 

G0*2:BU=B:G0SU871B:F0RI=-1T08:I=PLAY(B1 

638 NEXT:G0SUB868:AD=1B79:G0SUB78B:PUTSP 

RITEB. ( 128.87) .5. F:PUTSPRITE1 .( 128.87) .1 

5.F+2:G0SUB64B:Pl$="f j»»<" ■H$*"^,'.t»k&th%ti 

OCIbZlSll.*' ! <.BCSIb•>*'nSl<*">^.t^S1>'>%• !!!!!! !t 

M^C'tZS + 'A'" :G0SUB728:G0SUB73«:G0SUB7B 

8:RETURN9B 

64B WI=482:UH=284 

65B LOCATEU I MOD32.WI*32: PRINT"*" STRINGS! 

UHMOD32-2.132)"B" : F0RJ=1T0UH*32-2: LOCATE 

WIHOD32.MHf32tJ:PRINT"t"SPC(UHM0D32-2) - * 

": next: locateu im0d32 .ui*32* j: pr int" ["str 
ings 1 whmod32-2 , 1 33) "»" : return 
668 ui=34:wh=277:gosub658:f0rj=1to4:loca 
te6+j.1 :printchr$(asc(hids(z$. j.i ) )-1 ) :n 
ext:printe$"y: ."using"lv##" :lv:printe$"y 

SX#**t ###«" 

678 PRINTE$"Y##"USING"HP##«* mp*#*» ap## 

#";HP;MP;APtUP:PRINTES"YXX"USING"###* 

*##• AC#*#" :HH:MM;AC:PRINTE$"Y'#"USING"G 

OLDt#*#* EXPEi*###" ; GO: EX: RETURN 

68B S=STICK(B)0RSTICK(1 ) :G=STRIG ( 8 10RSTR 

IG(1) :T=( PEEK! -1845 1=251 )0RSTRIG(3) :RETU 

RN 

698 VP0KE6144*UI+UH»64. 1 44 :G0SUB68B : IFGT 

HENUH=WH+1 :RETURNELSEIFTTHENVP0KE6144*UI 

+WH«64.32:WH=8:RETURNELSEIFS=10RS=5THENS 

=(S=11-(S=5) :IFVPEEK(6128*WI+64«UH*46«S) 

< >32THEN69BELSEFORJ=BT099:NEXT:VP0KE6144 

+UItWH«64.32:WH=UHtS:G0T069BELSE69B 

7B8 AD = AD+IS = 7)- (S = 3)-HBB»((S=1)-(S = 5)): 

A$=RIGHT$("BBB"»HEXI(&HD35B+AD*5) .4) : POK 

E&HD172.VAL("&H"+MIDSCA$.3.2) ) :P0KE&HD17 

3.VAL("&H"+MID$(A*.1 .2) ) :N=ADM0D5+1 :U=US 

R5(N) :V=VPEEK(651 1 ) : IFSM0D2=1 AND ( V=920R( 

BU=8AN0V<1 12)0RIBU=1ANDV>111 ) )THENBU=1-B 

UELSERETURN 

718 IFBU=BTHENVP0KE8197.95:VP0KE82B4. 17: 

VP0KE82B5. 17: VP0KE82B6. 225 : VP0KE82B7 . 248 

:VP0KE8213.17*222»SN:RETURNELSEVP0KE8197 

. 85:VP0KE82B4.99: VP0KE82B5.71 :VP0KE82B6. 

85:VP0KE82B7,85:VP0KE8213.71+184«SN:RETU 

RN 

72B M=-1 :F0RJ=1T0LEN(M$) :M-Mtl :A=ASC(MID 

S(M$. J.1) ) :IFA=38THENL0CATE2+M.2B:PRINT" 

%" :M=M-1 :NEXTELSEIFM<26THENL0CATE3tM,21 : 

PRINTCHR$(A-1 1 :NEXT:G0SUB75B:ME=B:RETURN 

ELSEM=-1 :J=J-1 :ME=ME*1 :GOSUB758 : IFME=2TH 

ENG0SUB73B:ME=B:NEXTELSENEXT 

738 FORK=BT01 : A=A4 1 : A=A«- ( A< 1 2 ) : IF A=BTHE 

NVP0KE6831 . 16B+ (VPEEK (6831 ) =1 6fl ) »128 : K=8 

:NEXTELSEG0SUB68B:K=-G-T:NEXT:VP0KE6831 . 

32:FORK=-1T0B:G0SUB68B:K=G*T:NEXT: IFMETH 

ENRETURNELSEG0SUB75B:G0SUB75B: RETURN 



74B WI=289:UH=198:G0SUB658:PRINTES"Y*#tt 

l>"Et i 'Y-#UWt" :UI = 354:WH = 8:G0SUB69fl:WH = -(W 

H=1 ) :RETURN 

75B F0RK=BT01 : F0RL=BT0WA»6B :NEXT : U=USR (B 

) :NEXT:RETURN 

768 U*USR7(B! : PLAY"V1 506L8EC05AF06D05BGD 

AFA06CA4":HP=MH:MP=Mrl:F0RJ=BT07:U = USR4(V 

AL("8.H"+MlDt("715141111l4151Fl".J»2+1.2) 

)) :FORK = BT08B8:NEXT:IFJ = 3THENGOSUB67fl:NE 

XTELSENEXT:MU=B:G0SUB86B: RETURN 

77B H=-l :F0RJ=1T0LEN(M$) :M=M+1 :A=ASC(MID 

S(MS.J.I) ) :IFA=38THENL0CATE2t«.6*I«2:PRI 

NT"X":M=M-1 :NEXT:RETURNELSEL0CATE3+M.7+I 

«2:PRINTCHR$(A-1 ) :NEXT:RETURN 

78B WI=161 :WH=S87:G0SUB65B:F0RI=8T07:C0= 

I-H :MS=It(FNB) :G0SUB77B:NEXT:L0CATE1 .5+E 

«2:PRINTCHRS(128*89«(E>B)1 :WH=B :FORI=8T0 

1 :W1=226:G0SUB69B: IFUH=BTHENI= 1 :NEXT:CO= 

8:RETURNELSEI = -(MID$(II.UH.1 X)"A") :UH=U 

H-l :NEXT:C0=WH+1 : G0SUB648 : RETURN 

798 PRINTEI"Yt$"USING"LV## HP**** MP**** 

" :lv;hp:MP; :PRINTMID$(" good; sleep" .ci«5 
+1 .5) :RETURN 

8BB F0RJ=BT03-(Q=2B) : PUTSPRITEJ . (96* (Q=2 
B)«16*(J*2)»32.47»(JM0D2)«32) . EL (Q) .4+10 
*4)»4*J:NEXT:RETURN 

81 B F0RJ=BTO4:PUTSPRITEJ . (8.289) : NEXT: RE 
TURN 

82B RS="" :F0RJ=1T0LEN(STR$(R) ) :R$=R$»CHR 
I(ASC(MID$(STR$(R) . J. 1 ) )+1 XNEXT: RETURN 
83B MID$II$.C0.1)="A":RETURN 
84B SOUND7.184:F0RJ=1TO8:U=USR4(255) :SOU 
ND5.B:S0UND4.ASC(MIDI("t8«f"* pw". J.l 1 1+1 
:S0UND18.15:F0RK=BT018:NEXT:U=USR4(241 I: 
FORK=8TO26:NEXTK.J:SOUND7.156:S0UNDlB. 17 
:RETURN 

85 B F0RJ*BT022: IFF ( J ) =BTHENNEXT: RETURNEL 
SEP0KEVAL("&HD-+MIDS("4ED76D35A4F73025F1 
7934DB6747285C43E76B67A67BA4E546C5BA4BB7 
DE77B58B594" .J«3t1 .3) )*121 .ASC(MID$( "7X4 
-f777777l/7777777777?7".J + 1 .1 ) ) :NEXT:RETUR 
N 

866 S0UND7. 156: FORI =BT03:S0UNDI.B: NEXT :S 
0UND8. 15:S0UND9. 15 : S0UND1 B . 17:MU=2-MU : PO 
KESHD95B.176:P0KE&HD95C.219-MU:P0KE&HD95 
D . 1 1 +MU«2 : P0KE8HD996 . 221 -MU : P0KE&HD99D . 2 
19-MU:P0KESHD98C.1H-MU«2:U = USR6(B) : RETUR 
N 

878 SOUND 1 2. 8B :S0UND6.2fl: SOUND 1 3. 8: RETUR 
N 

88B U=USR7(B) :PLAY"V1504L16CEGCEGD-FA-D- 
FA-G4":F0RI=-1T0B:I=PLAY(B):NEXT:IW=MM*R 
ND(1 )«(MM*8)*RND(1 ) «1 B*25*LV : G0T072B 
89B R=UP-EX : G0SUB82B : M = " <jltlr'." *!%*"', ' 4tt 
B»*o&a*'B3i:?on><r!"*R$+"tt;7ii«t8!7<&iia*swii; 
(lBS r ":G0SUB72B:G0SUB73B:M$="fj^**t8tt*8»; 
K«<t)»«tlT*i*B-:G0SUB72B:GOSUB74B:IFUH=BTH 
EN91B 

9BB U = USR7(B) : OPEN"LJTtlDA"FOROUTPUTAS*l 
print*i .mh:mm;ap:ac:go;EX;lv:up:E:up:ua 
f0ri=bt022:print*1 . f(i ) : :next :f0ri=1t08 

PRINT*1 ,D(I) ;:NEXT:CL0SE*1 : OPEN" Lit* IT" F 

OROUTPUTAS*! :PR1NT*1 . 1 $ ; ZS : CLOSE* 1 :U=USR 

6(8) :MS = "«-j<t)!tt5BS r ":G0SUB72B 

91 8 MI = "v ik&lllz ■"♦2t+"4*»: G0SUB72B:G0T02 

3B 

928 IFQ(8)=B0RINSTR(I$."N"l=8THENM$ = -<-j* 

'> , »tt,>*&'>1t'><&ILS&tfvaim< • !BU8»!«MBSIW»S 

»*81.'hB*a«S8*8! ! ! ! !ttSlt< tit 44" " : Q( 8) = 1 : GOSU 

B72B:G0T023B 

93B n$="<jtBt<tlt5S6S-iSSC r »8?? ! 5 : ?t>8V»8: 1 ! 

^^miJSHtBKCOSISBA ' t8»UC' " : G0SUB72B :MID 

I(It.INSTR(II."N") . 1 )="A":G0SUB738:F(1 ) = 

1 :G0SUB85B:S=B:GOSUB7BB:G0T098 

94B IFF(2)=lTHENnl="-rj : F&»!If i Jttf f ^tt^B«« !8 

■5<T«.t! ! ! ! !»S&LV '" :G0SUB72B : G0T023BELSEIF 

F (6 ) =BTHENMS="f j /Jt»»8tt I JtHt»»l")« ! 9lt; US') 

S ! ! *»ti« 1 *«Ttir»5&L3 r " : G0SUB72B : G0T023B 

95B MS="-rj<r#,!Ott>H;n*«S»»M9?'8er>!:8! ! !BBS 

t8»«iS«t8»*ttti*!llt , "5-5!ieS-5*! ! X^USS^^.TC^Sh! 

»»8*8 ! »A.l*»* r " : G0SUB72B : G0SUB73B : F ( 2 ) = 1 : 

GOSUB85B:GOT094B 

968 IF0(6)=2THENM$="-rjl»L5*8*USf ■)011»'>'.Z'> 

*d»8tt J b^«8 ' " :G0SUB72B:G0T023BELSEC0=INSTR 

d$."0") :IF0(6) = 1ANDC0>BTHENMI="YjMlt:<t» 

4S» r tSU ! JtRAjr- :G0SUB72B :GOSUB83B :0 ( 6) =2 

:G0T096BELSE0(6) = 1 :M$="-r j»30«i&*« r NTY?GB 

0«*fflt< il '.'.'.>. itlTtt78*'-»#t*i:»tlS <-" : G0SUB72B : 

G0T023B 

978 IF0(7)THENMJ="i-j(.>C5!»Sl.>L»*SlS?a*' : ."*ll 

>£/7«! ! ! ■mt \ -iffltUi&t ' " :G0SUB72B:G0T023BELS 

EM$="Tj*7«i*7«!(»(lt ; 54f r":G0SUB72B:IFINSTRI 

l$."J")=8THEN23B 

986 MS = ZS + "tt*ll.*ii?»A.StS r " :G0SUB728 :G0SUB7 

3B:M$="'rj???nlll^lfl:IB«4'lil#8<tS'B*S8I ! ! ! !»M 

kif)CIK:U£&>>t'3Jt7?7?i>i<D' '" :G0SUB72B:0(7) = 1: 

G0SUB73B:G0T097B 
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99B IF0(7)=2THENM$='VjUi!^<El,'» r 4S»B?7*i:8, 

f H>CS»! ! !t*fBt ; >*« r ":GOSUB72B:GOT023BELSE 

IFQ(7)-aTHENMS="»'jl.>L>!kS»li"+ZS«" r ! ■itf^RT&t 

8**184:! ! ! !<seru>!7*»»}»tfc}<tLM99 , J" :GOSUB 

66e:G0SUB72B:G0SUB738:G0SUB76e:M$ = "-r j*S» 

USMtlrbtt • - : G0SUB72B : G0T023B 

18BB MS="<jJ7*S7»l":G0SUB72B:IFINSTR(I$." 

J")»BTHEN23BELSE0(7)=2:MS=ZS + "a*«/>i?«*,St 

* r ":G0SUB72B:«I = "-rjUU!" + Z$-»"l'5*8tS r! ???*S 

BGtCV! ! !«2»«ffl , W-:G0SUB728:GaSUB738:MS= 

ZS-t"jaB" :G0SUB72B:GDSUB73B 

1818 M$«"-rjfSTO!260KHi!7L.t87ty7l/tt»S*S: ! ! 

2l J ?»ellOC?*!A.«T»ul!S^fcT* , '! 1! ! HSOSB H'ESB ! « 

»tt*»&Vt&U! ! ! ! ! !l>S»W;ibt:&7t.'?l/im»&EIH:&t! 

r ! rjMOWUMIt ! <tMtfmtiXt&V" :GOSUB72B :GO 

SUB738:MIDS(II.INSTR(IS."J") . 1 > ="Q" :GOTO 

998 

1B2B IFINSTR<IS."M")>0ORINSTR(IS."B">>BT 

HENMS="*j»*tSL*!*S7»!tU*!l><t*. , KS5*tt«! ! ! ! » 

»ir)-S8l.V:G0SUB72B:G0T023BElSEIFINSTR[ 1$ 

,"Q-)=BTHENMJ="0'7'fjW!l!r*tSt,*B'**8** , >?^'' 

":GOSUB728:GOT023BELSEMIDJ( 1$ . INSTRt It ." 

B")»1)""H" 

1B3B M$ = "D'Mjt.ii! , Ba«M^SB'tX' ! ?? ! ?t»8;U ! !»»* 

Tso*cttt«,eiii - B(ass!7<a:*z>>« i ■ !»s>t:^B]i-tr<;&cv<s 

Xtt7tl< 8 It !.>}** ! ! ! ! »t«*7S , )t'5ttt&S r " : G0SUB72B : 

G0SUB73B:G0T01B2B 

184B GOSUB7BB:D=5»(AD>1439)->-<AD>2324) + (A 

D>23S4)-MAD>4B24)t(AD>4854) :G0SUB64B:MS= 

Z$*"B!L«8*l6ltI8II)$ r ":GOSUB72e:IFQ<D) = lTHE 

NM$ = "t*t!«K»n'5*W- :G0SUB72B:G0T023BEL 

SEM$ = "t&.l.'ltC»llt*b*&!tttl : >A*i»OCS«;^ll r ":GOSU 

B72B:UI=182:UH=20B 

1B5B GOSUB65B:PRINTES"Y'8it)»"E$"Y)8cnj»U 

":UI=247:UH = 8:G0SUB69B:IFUHO1THENS=fl:G0 

SUB7e8:GOT098ELSEIFD>BTHENGOSU8B7B:M$="T 

«,t*U»*S< SJUS ' " :GOSUB?28 : < D ) = 1 : GOTOl B7BE 

LSEIFINSTR<I$."B">=8THENMS = "t*»»ll,t!?Wt*« 

» : zmf>»s,om:vak >. ?»7Sie v : gosub728 : goto23 

B 

1B6B GOSUB87B:M$ = "<8Mlt7ll<8!:&UBIS6«<Sb< IT 

«it*l/»! !SS<!4TS'-:Q(B)=1 :GOSUB72B 

1B7B IF0(fl)tQ(1)tQ(2)«Ol3l+Q(4)+O(5X6TH 

EN23BELSEG0SUB73B:MJ="M?E»*«8*5i:»tl?99 : ?3 

»••• GOSUB728:SN=1 : P0KE8HD77E . 214 : FORI*BT 

03:VP0KE8213.VAL(*8H-*MIDS<"445577FF",I« 

2+1,21 ) :FORJ=BT015 

1B8B VP0KE1344*I«16»J . VAL ( "SH"*MID$("BB0 

8088888800888888181818181010100000080008 

88e7Ffl18l818lBl0lBlFFC1838AlFl7BBBD87A47 

6E787D7E7C787B4001F1F3F3F7F7F07B7FBFBFDF 

DFEFE".I»32»J«2*1,2) ) : NEXT J . I :G0T023B 

1B9B G0SUB648:MS="?87**l/j->ttSS*<:S«817«'' 

t?88lttl»;8! !»!26«***ltfc&<«»«!#?lii:»t);( r ! I MJ 

! M t*>tt, ! UhtBMSS* V*1:S ! ! »MBi ! Sttf #« !•£ 

S?»SS r ":'GOSUB72B:G0SUB73B 

11BB MI = "<j7t:&»»B5jA»«Ji:!7bC&7t:/ , 7blt!C&*! ! 

S&fO!:>a»iroi:«ti:lt i 5S(tt&»'' !:>♦&«&! !C»IB6i^U!tb 

C&7t^7Hl»T')»: ! ! i !tCi&»»»t!t!^lii7ZltU-i5&»«T 

91St 1 ! »tt»t)« ! *«;ttS4Eet«&eSttt&» r« : G0SUB72B : G 

0SUB73B 



11 IB M$ = "<j?S*&»7')(t!*S&l.>*SXSMS«;#;lt&«!«& 

**! !»*ttts???H3*&!»*KS&B*tt*S' ! ! ! I lU'lMtO 

8E»B8S»4:8*& •*»«&»< ttl ' " : G0SUB72B : GOSUB73B 

:a=19:G0SUB45B:AD=32S9:S=8:G0SUB7B8:G0SU 

B648 

112B PUTSPRITEB. (12B.87) . 5. 8 : PUTSPRITE1 . 

(12B.87) .15.2:M$=-f&7»*bj»S0i.7B'4 ! ??Stti^S 

8!«E1 ! I !*&?»?? 'B!'-?9^*l) i ?9?9?tt&'>ai' _ :GOSU 

872B:PRINTE$"Y)/<->"E$"Y«/x»":G0SUB73B:F( 

18) = 1 :GOSUB85B 

1138 MI=ZS-t"j???9 r "tSTRING$(16.33)»"<j" + 

Z$»"»**S , ":S=B:G0SUB72B:G0SU8738:G0SUB78 

B:FORI=BT0188B:NEXT:FORI=183T01B3STEP-16 

:PUTSPRITE2.1128.I) . 5.32: F0RJ=BT016B :NEX 

TJ.I:G0SUB648:l1$="D'>-(jW*&7>*l/«*»»?ttt&e 

D'ttSSS?! !?9?9 r ":G0SUB72B:G0SUB73fl:MS=ZSt 

114B G0SUB72B:G0SUB73B:M$ = "D7-(.i : ?y3?'?V*'» 
^*'e?U!*C*ti*&! I !»»1!<&*t!4'":GOSUB72B:GOSU 
B730:GOSUB7B8:FORI=103TO183STEP16:PUTSPR 
ITE2. ( 1 28 . I ) . 5 . 32 : F=1 -F : PUTSPRITEB ■ ( 128 . 
I-16).5.F:PUTSPRITE1 .<12B.I-16).15.2+F:F 
0RJ=8TO22B:NEXTJ.I:G0SUB81B 
1 150 S0UND7.184:P$="L1604A4DEFAG4CDEGA4D 
EFAGECEGFEGB-205C4CEFGAB-AB-AB-AB-A8-AB- 
AGFE04AB-AB-AB-AB-AB-AB-AGFE" : Q$=" L1605D 
4EFEDE4EFGEF4B-AGFCEGCEGCEF2E4DECEDEFDEF 
DEFDEFDEFE04DEFDEFDEFDEFDEFG" :PLAY"V15" . 
-SlM3Bee" ."V13" : PLAYPS.PS. U$: FORI =-1TOB 
1168 I=PLAY(B) :NEXT:GOSUB86B:U=USR2(B) :F 
ORI=eTO53:U=USR3C0):READDS:LOCATE23.23:P 
RINTDS::F0RJ=8TO573:NEXTJ.I:U=USR7lB> :SO 
UN07 . 1 84 : PLAYP$ . PI .Q$ : PLAY"D203D202D1 " . " 
A2G-203G-1" ."03A2G-202G-1" 
1178 GOTOl 17B 

1 1 8B DATA974 ■ tCt>lli|ie&;<&L>IUl»0 i -9SltL^.SS«tt 
iilim iXmtk'inittl ! *>t!H*.<, r , 1 1 78 . Jl/CS7t/'7bO 
:i-30»Tt»-)*tTtSi ! !')to r .11BB.26Mli*«S* , >!M}* 
&i*)lZ9SttL'.SS!ISS& ! !<.'r>A.i!4*8-5»EBM*e r .1488, 
«B»&?-(tt»t)iSe ' . 1 478 . tttl ! »»»B ! »?BBtt)*&utl 
KSS*. r . 2878 . till < t&7Sl/tU :>£&!• r , 288B 
1198 DATAf#'5»B!77ttl : 5S8«f«8<.><*S8B4:'! ! ! ! !48 
T"»Si7»K»OSKS8 • .3384.AtB*81» ! C^«&MEIt^K< j: 
**tfc»h r ! ! !lt»0«M»7»»JSB8 !«*}«! ! ! ! ! IV) I, 
it ! OtVXtL i *67»*b»8» r «» ! ! BBBfUlK t&TltlB?tt* 
B ! 4S"WB<r&» r . 5 B68 . aVItlitl ! »lit h y»«» ! kfttttttllt ! 
I ! !}StrS?B!^BM<rSJ»<.>tll«';S»*B.5B7B 
12BB DATA4J0Tll^t»8^* r «Sh!:8H'USB! ! ! ! ! ! Jl/t 
87t/'7Htjm&*8 : !>< MtltrM 11111 lii/u ! tffit ^igJO . 
329 . S*!B*»1»81/I ' *&*B&SK:B ' . 528 . IC5ttli»» !07 
4®t*>%Z\>tl.TKJTM '. ! »»*8^ti;BS ! *ttt8^B260»K*K I 
! !! ! ! !«ir»B!7»*B*SL51:6i*t»*IBSKMr,a28.»ttt 
»*»»»! «A8»tlBt 1* ! BXCiOf S 1 ! gKfc 85MSS8 r . 538 
1218 DATA^l/C87t^7btt»St8B!Bm.'*tt8u(l! ! ! !<8 
KttfMt^*. Wt«K«8B(r ' ■ B3B . BlUMfK : 5»iS8iB& 1 
^l/C871:y7UB! !«7»*l<»4«:! Stll8l/4*KS8f 8' .438 
4,XbC87t^7bll«rSB!XL.C87t/'7U»! ! ! !TS^tlic»i<8 
KUZIl<8»!*l!&J*»! ! ! ! !*lt»«®t»&»r ,45B3 .T<*&^ 
SS»8t^tie<!#»^iCll0*')8! 1! !^«j*8*tl r .4585 



122B DATA*«,Ti.7ll!lr8*Ci8-)*<t8*!C»l<BSS8'".47 
B3.»JB!*87'rtSatnt8e r .47B5.^l/C871:/'7l/B! ; 5ai 
S^OSJtkKJiSK! I ! !5&tl!i?? , ? r ,2679.»«,-rt*ltn!<*lt 
«8?'}>TC£&hfJtV&«! ! !»i:- , >Jit! r .649.**ttlH«8ttt!<IB 
:77»8<-)**8' 11111 !91W:»IH' .3364.i^»S88Jlir» 
HUH >. t«81t^»T» 1 1 1 1 I I ^>SfllS8 r t8J&»t8f**^»C ' 
1238 DATA5454.i«TB»l,th)l r »8*8ltfft^*S^»i:! ! ! 
! ! !,»!«:&»»■>* " .1919.SltH8!»**i:S<S , S8*&H»iit& 
SS'lfWSt! ! !»tlA.' .4819.*&7>Kl/0»B!»T»S»e')3)ir 
*.«•)»&! ! !*1>ltatS*S'i« , IM(i8«i8:lt)»8»l*!lft'>»i !U« 

1248 DATA4934.*S7»*H J *JB»S!illSa«g8t' [111 
! !!IW;8«»8<I< mtjOWKSSi' .2884.4174.724.4 
799 . 984 , 2874 . 41 64 .634 . 4499 .5319.1 584 . 426 
9. 234. 48B9. 979. 5264,4669.584. 4589. 1374,5 
24, !,8.<8»ili7)t<S,B.*t8«tt#tt,4BBe.^>OE*i/7.6 
588 ,*tt»B7(l<& . 1988 .-9t^8D7T8 .988 . t8tb97t8 
1 258 DATA7B . BLStS* . 248 .»»BS .14. »l»s.7 .725 
. f » 9D7?y . 52 . B8»S&» . 8 . 7< Htz 1 , 8 . t&BUUWt&H 
. 7 . TTY9GBO . 548 . *&U7?8I1708L . 74 . < &»tt ♦»!»-,* . 
B.-s'l^WttT, 12B.£^')ll/ltt->.398B. h8r>t!lt»->. 128. 
I-S'n-* «»7. 1288 . I&i/h&ltltl-i . 48BB . H)(^L.11»T . 5 
12.M7t&a»-..248B.*Sl.*&btSlt*,.78eB 
1268 0ATA*»8'nSI'',69,21 . 2. 18.8, 21, 1 ,6.="*X? 
8"s8«,',73.29,5.lB.fl.27.1.9.C"C8t:8.285.86. 
12.7.1.49.3.5. WTVl^ik* . 222 . 8 1 . 22 . 8 . 4 , 66 
. 4 . 1 B . Ii&&?«5» . 84 , 42 . 23 , 1 B , 1 , 38 . 2 . 2 . »<rli 
C8 . 27 1 . 97 . 55 . 9 . 8 . 85 . 5 . 1 4 . ;1tll,i/87t8 . 268 . 1 
92,8B.9.5.1B8.18.8.5i*<t.458.285. 135.8 
1278 DATA5. 128. 42. 4. **?=■«. 438. 11 8. 32. 7, 
B . 98 . 8 . 7 . >lt H . 1 784 , 1 73 . 47 . 1 . 2 . 428 . 32 . 1 1 
. 481/7*8 , 471 , 1 37 , 39 , 6 . 5 , 97 , 1 2 . 6 . fc«S»*tt< f . 6 
79,283.49.4.2. 144.27. 14 •HtZZt'i, 21 8 .43 , 1 . 
5.2.74.3.4. *7&l/f -Hi, . 582 . 99 . 27 , 3 . 4 . 92 . 7 . 1 
3.?8o*98St.3658,213.12.2.3.24B.278.14 
1 2BB DATA97i/'J7 . 1 1 48 . 26B . 35 . 8 . 3 . 1 37 . 87 . 3 . 
f>t«'l<>&» ,2815.346.123.7.5.158.124.15.^1 
7tSr&'ltS* , 9999, 522.1 IB. 4. 4, 667. 578. 7. «,C8 
M** .1638.49B.77,6.3.214.219.12.*87**I..7 
2BB.664.178.8.3.B.B.5.*87»*l/.e.777.25B.7 
.6. 999. 999, 5, STAFF,, . .SCENARIO. .KENSHI 
1298 DATAHSHOJAKU. . . .PROGRAM. . KENSHI. HSSH 
OJAKU. . ..MUSIC. .YUSUKE.*l8liIKEDA. . . .MONST 

ER.MiDESIGN. .MOTOHIRO.HBHiMIURA, , 

■ .THE END,, , 

13BB U*USR7(B) :BEEP:END 
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a ^i'ymwzz&mcDT' 

mm 

M BGMT-*-^^Sffl 
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• U7.KB 

ad mm<Dmi±mxm 

M(n) A<D~7^y±0MM 

(X^^+Y^^xlOD) 

M$(n) mu&mm 



YA gLAWcTDlqKXffi 

MU BGMfflii(7-f- 

JbK = 2, «II!=D) 

co ffflii^i^* 

FNB illlyfclKDII 

i (n) mmvm® 

i s ft-ozi-\&mm 

i $(n) mmnzm 
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Q tfJUUfcSx 
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m, ±^mx3£+m)/ti- 

Z$ Sfu 






<5*l#*5<*»*lt*^ 



[S I LVER SNA I 

L]7^§r'>Lyite^urc 
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AP KB?] 

AC g<I* 

HP ft?] 

MH «*ft?) 

MP H?J 

MM mxmt) 

EX «§HI 

up ;^L/A:ju^r'©i 



lv Is^lb 

GO firf^S 

e nftumsagg 

wp g«u/ca^©i5i 

da §i??c^'y-y 

E$(n) Sfi 

EC(n) g=«?j 
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EE(n) ^CAS^iHI 

EG(n) 3McA3£H 

EH(n) Wh 

EM(n) Dfl£ffl$»$^-r£ 

EL(n) S^g 

EU(n) m?v%5n 

EP(n) imti 

EH DiiIB3©lxfflft* 

BA iSll^lJfr 

BU MWKDftti 

ci ustf^rusfr 

ce Hx/mtus^ 

C3 P§#2)MKX££ti;6n 

ri\s# 

C4 MWRttiWbtlZ 

C5 S^OKlSfttfE'tefr 

CB SfclS+fUfr 

F(n) ^^ywmy^y^ 

nia-cos©*!^ 

SN S/Jl/K-X^-Jl/tftti 

Q(n) «/■*-'.; :*©£'J7*!I 



yng^ixMm 



• U7.KA 

10 fflffiKS 

30 V^>I§»S3& 
40-50 v^t^h, v>v7ta 

60 ^-f^^A^ ->£«'/ 

70-BO BGMfflV^VIg, B 

GMf-^iS 

90 Z\y=r4—3.— ■ 7,^— h 

iilR/UT-NB^fr 

100-140 7S/VH7*— ^(ff 



150-240 '7 , y^'7 ! -$'(fif50 
250-330 ^f^^x-^ 

(ffiorii^^fe) 

340-660 7.^5-f SA^-> 

670-720 BGMil^Vi/Vli, 
BGMf-^ (ff70riw^^^) 
• U7.SB 



20 giSx-^Sw^^/'JX 

RAM^H^-gO^x/O^'S 
30 S^©€Sti^^«)S 
40-50 *—7-yV 

bo mmmmfc/mQ^m® 

70 x-^P-K 

so mmmit 

90-no ^<®a/s#ss 

120-130 AtIS^«iiI 

140-160 mm.(D%m 

170-230 JIMS, O5KJI©$0> 

II 

240 +f'=l®ttiJMy^=*ttiIIU 
fc5tT440^7H'3< 

250 m«3ffi] 

260 ^8B3^W1*^ 

270 assflisaa-y-^ 

280-390 
400-420 

430 mwmmmm%myy 
440-630 itii^ii-tt-^' 

640-650 X^tz-^O-OK 

660-670 ^r-i'Xii+t^ 
680 Xx^'^^h'Jfl-a 
£©A2)tr:7 

690 -h-ywMm, iSR-y-^ 






7oo~7io ^v^Wrs, etao 
720 xv-fe— y*aw^ 

730 K'J^-A^^S+t^' 
740 sn • nnxSiR+t^' 

750 Ox-fS.T-^a-Jb^JI 

760 asx^CX^Big/l**, 

Ht)l5lll)+t^ 

770-780 JSmSJR-y-^ 

790 illIKXx-^XSS+t 

7 

800 $©3.7^ KSl^trT' 

l#yfcfe1*7 

BGM7^-h77 

-880 aseo-y-^ 



B10 
820 
830 
840 
850 
860 
870- 



m? 



890-910 #-<7fflB 

920-1030 Mzmtmm 

1040-1060 garOSfliil 
1070-1080 %*Mt-tt-J\j 

(Dihmmm 

1090-1110 AtK^CIS-T^H 
1120-1170 iVfW^S 

H80-1230 Momm. mm 

1240 l£©A^, /1\3©)£ff 
1250 llfflf-^ 
1260-12B0 ®©?-7 

1290 xyf^yvxyte—y 



-?ui>mm 



BHD000-SHD047 

SR0) 

SHD047-SHDO9G 
i»ttiil©t ^©ilHtiTJ frx. 
(USR1) 



SHD09 1-SHD0F7 

cfet+S(USR2) 

SHD0F8-SHD1 3B 

l^xf >7X\y-fe— :>"37P 

-JKUSR3) 

SHD1 39-SHD1 BE 

£?e£gS»I(USR4) 

BHD1 BF-SHDE3E 

7^7iS(USR5) 

SHD92F-BHD947 

SRB) 

SHD94B-SHD954 

7-f 7-119 3^3 S-->7(U 

SR7) 

SHD95E-SHD9AD 

BGM;SS7p7^A 



9-^X'JP 



SHDS3F~eHD2B2 

SHDE63-SHDE94 
V>7©il*x— 7 
SHD350-SHD9EB 
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384B5B6B8891 B2B21 233E7EC9CDDDE 1 E5FE" 

82B A=SHD0D5:F0R I=B TO 1B5:P0KE ItA.VAL 

<"&H"*MID$IAS.I«2*1 .2) ) :NEXT:DEFUSR=A 

83B U=USR(B> :PRINT"MAIN LOADING" : RUN"GRE 

Y2.FDG" 

848 ' 

851 ' GREY COLLEAGUE 
868 ' TPM.CO SOFT WORKS 1991 
878 ' 

77-fll/« : GREYP. 



18 



FIRST 



FDG 



28 CLEAR2BB.&HA9C8:DEFINTA-Z:KEYOFF : POKE 
&HF3C4.9:POKE &HF3C8 . 8: SCREEN1 .2.8:UIDT 
H32:DIM N$<7) .U(23) :GOSUB 518 
3B DEFUSR=&HBDCA:U=USR(8> : DEFUSR=&HBE5F : 
FOR I=BT03:READ AS: U$=USRIA$ ) :NEXT: PRINT 
"WAIT FOR A MINUTE i" : E$=CHR$(27) *"Y" 
4B DEFUSR=&HB74A:U=USR(B) 
5B RESTORE 55B:FOR 1=8 TO 7:READ N$(I):N 
EXT:GOSUB 51 8 : VPOKE4B5.96: VP0KE467 . 32 
6B FORI = BT023: READ U : U 1 1 )-=U«8 :NEXT 

78 ' TITLE 

8B M=B:HT=8:VDPC21=6:VP0KE 2384 .288 : CLS : 

GOSUB 13B:RESTORE 57B : D=B: E=1 B : G0SUB52B : 

D=21 :E=B:GOSUB 52B 

9B FOR I=BT016B:G0SUB 1 28 : FORT=8T02 : PR IN 

TE$"6«":MIDS(-««PUSH START««-<SPACE$(14) 

.1-(I MOD 8>3)»14.14) :IF STRIG ( 8 I +STRIG ( 

1) THEN T=5:NEXT:I=999:NEXT:G0T0 118 

IBB NEXT:I=I»(I>158)»8:NEXT 

11B S=&HB885:POKE S.24:P0KE S*2.B:POKE S 

*3.24:I=B:CLS:D=5:G0T0 158 



m 
< 



65 



128 A=&HB9BB:B=(I>98> :C=(I >4B) : POKE A. 98 
-I-256«B:POKE A-tl . 1 28 + B : POKE A+2.4B-I-25 
6«C:P0KE A+3.129+C:U=USR1 (B> : RETURN 
138 S=&HB8B5 : POKES. 8: POKES* 2. 16B: POKES *3 
.25: POKE -181 64. 128: DEFUSR1 =&HB83B : RETURN 

14B ' GRY DATA SET 

158 DEFUSR8=SHAC36:A=&HBAB8:AS="B298886D 
8BBBBBBB" :FOR 1=8 TO 7:G0SUB 5B8:T=(I>4) 
:POKE A-7.&H98-U«24«T«255:P0KE A-6.&H88- 
T:NEXT:POKE &HB1FA.4 

16B A=&HBAA8:AS="86EC8B6D8828BB8BB6CF8B6 
08BBBBBBB" :GOSUB 588 : A=&HB91 B : AS="B69B88 
6DB82eBBB8":GOSUB50B: I=M«3:P0KE &HBAAD.U 
(I):POKE &HBAB5.U ( 1+1 ): POKE A-3.U1I+2) 

17B • DATA SET 

18B VPOKE 23B4.208:CLS:A=&HAE7E:DEFUSR=A 

:FOR 1=8 TO 12BB:NEXT I 

19B POKE &HB82F.255:FOR I=8T03:POKE &HB8 

2BtI , 8:NEXT:POKE&HAE24.0:POKE&HB78E.2B5 

2BB Al="7C82D9B8" : A=&HB9BB:G0SUB58B : AS = " 

747FA97F":A=SHB548:GOSUB5BB:AS="A97F747F 

■ :A=&HB562:GOSUB58B:POKE &HBAFB .2B+M«4 

218 X=RND(l)«7-3:Y=RNO(1)»7-3:IF X*Y = B T 

HEN 21B ELSE POKE &HB9BC. 128+X : POKE &HB9 

8E-128+Y 

228 FOR 1=8 TO 49:P0KE &HB918»I«B . B : NEXT 

:POKE &HB14E.2:POKE &HB1CA.&HCD 

23B ' ENEMY MAKING 

24B A=8,H8918:AS="85CF826D8BBB8"*RIGHTS(S 
TR$ILEN(N$(M) )*6) .1 )*"2B" :GOSUB 5BB 
25B FOR 1 = 1 TO LEN INS (M ) 1*6: AS="87BB88BB 
BB"+MIDS(NSCM) . I "6-5. 6) -.GOSUB 5BB:NEXT:S 
OUND 7.54:SOUND 8.B:P0KE &HB838.B 

26B ' LOOP 

27B FORI=8T05B:U=USR(B) :S=<M=7) :PRINTES" 
X "♦MID$("FINAL".6+S«5,5>*" MISSION "tMI 
DS(STRS(M+1) .2-S.l) :NEXT:POKE8HB82F.B 
28B U=USR(B):IF PEEK (&HB82F X2B8THEN338 

29B ' DAMAGE 

388 SOUND 8.15:FOR 1=8 TO 15:FOR T=8 TO 
4-VPOKE &H9B2.T»4-H28:NEXT:U=USR(B) : SOUN 
D 6.3B-I:NEXT:D=0-1 :SOUND 8.B:SOUND 7.63 
•POKE &HB78E.1 :VDP(2)=6:IF D>8 THEN 1 68 
318 FOR 1=8 TO 6B:POKE &HB1CA. 1 : POKE &HB 
1FA.9:P0KE &HB82F .255 : U=USR( B ) :PRINTES" 

YOUR MISSION IS OVER I" :NEXT1 :G0T08fl 

32B ' BASE DESTROYED 

33B HT=HT-(PEEK(&H8918)<>5) : FORI=BT052: P 
OKE &HB91B«I»8.B:NEXT:F0R 1 = 8 TO 1B:P0KE 

&HB82F ,255:U=USR(B) : NEXT: POKE &HBB74.5 



34B F0RI=BT03:P0KE 1+&HB82B . 8 : NEXT: POKE 

&HB29C.53:POKE &HAEB9.1 

358 POKE 8HB1FA.9:VDP12)=6:S0UND 6.8:AS= 

-B3AD88678B18B1B4" :FOR 1=8 TO 7:A=&HB918 

*I»8:G0SUB 5BB:POKE A-7 . I«8+ 173 : SOUND 8. 

12:NEXT 

36B S=8:Q=15:FOR I=B TO 25 : S=S- < RND ( 1 >< . 

8)«(3-S) :C=0-S«5:POKE &HB82F .255 :U=USR( B 

):SOUND 8.1B*S:S=S+(S>8) :NEXT 

378 COLOR O.O.Q:FOR 1=8 TO 52:SOUND 8.15 

:SOUND 6.I-(I>26)«(26-I)«2:P0KE &HB918-H 

»8 . B :NEXT : POKE &HBB74 .18: POKE&HB884 . 1 28 

388 BS="B2AD8B6D8B1BBlB4B2FB8B6D8BieB184 

B2D88B5D8B1fl8184B2DB8e9D88B88181":A=&HB9 

1B:F0R I=B TO 3: AS=MIDS IBS. 1-16+1 . 16) :GO 

SUB 5B8:GOSUB 5B8:POKE A-8.3:NEXT 

398 FOR 1=8 TO 56:P0KE ( 1*8 )»8*&HBAB8. 8 : 

NEXT:U=USR(8) :SOUND 6.31:C0L0R B.8.B:FOR 

1=8 TO 18:VPOKE 2B48+I .24B:NEXT 
488 SOUND 8.16:S0UND 12.17B:SOUN0 13.B:P 
OKE &HB14E.2:FOR I=B TO 7B- (M=7 )»78 : U=US 
RIB) :SOUND 6.38- 1+ (38- I )«( I >3B ) :PRINTE$" 

BASEMENT IS DESTR07ED S":NEXT 
418 POKE SHBB74.3:POKE SHBB84. 8 : POKE &HB 
29C.44:P0KE &HAEB9 .285 : M=M*1 : CLS :G0SUB 5 
1B:D=D-CD<27) :IF M<8 THEN 148 

428 ' ENDING 

438 VDP(2)=6:P0KE&HAE26.11 : A=&HACFB : DEFU 
SR=A:DEFUSR1=A+17:RESTORE6B8:DIM AS128) : 
FORI=BT013:READ AS ( I ) : A$( 1*14 ) =A$( I ) :NEX 
T : RE AD A$ . BS . C$ . D$ : AS ( 1 2 ) =A$ ( 1 2 ) * AS : A$ ( 1 
3 ) =AS ( 1 3 ) + BS : AS 1 26) =CS : AS (27 ) =AS 1 27 ) + DS 
448 P=B:U=USR(B) :AS="T1BBS9M3B88L8":PLAY 

AS.AS.AS:CLS:F0RI=BT02BBB:NEXT:S=B:VP0K 
E 23B4,2B8:C0L0R 14. B. 8 

45B DEFUSR2=&HAB2D:F0RU = BT027:READ AS-.US 
=USR2(A$*"="> :PLAY AS ( P> . A$(P + 1 > :P=P+2:P 
=-P»(P<28) :NEXT 

46B FORI=8T01 :I=1+PLAY(B) :NEXT 
478 U=USR1 (B) :SOUND8.18:SOUND7.7:F0R 1=8 
TO 155:SOUND 6. 1*5 :NEXT:COLORl 5 . 1 5 . 1 5 :CL 
S:PRINTE$"(SYOUR RANK IS"ES"&&CLASS : "STR 
INGS(HT.88)E$" i*THANK YOU FOR PLAYING":F 
OR 1=1 TO HT:READAS:NEXT:PRINTES") )"AS 
48B SOUND 7.55:SOUND 8.16:S0UND 12.2B8:S 
OUND 13.B:GOSUB 51B:FOR 1=B TO 5B88:NEXT 

•GOSUB 13B:FOR I=B TO 158 :T=I*5 :ON- ( HT=8 

)GOSUB 12B:U=T-(T>15)»(15-T)«2:SOUND 6.3 
1-U«2:SOUND 8.U : I =1+ ( I >148 ) :NEXT 

498 ■ SUB 

58B U=USR8<A) :A=USR8(AS) :RETURN 



518 COLOR 15.B.B:FOR 1=8 TO 6:VPOKE 2848 
»UAL(-5H-»MIDS(-BFl11214iaiA1B-.I»2»l .2) 
).176:NEXT:VPOKE 2879 . 11 2: VPOKE 2378.176 
■VPOKE 2B54.176:F0R 1=8 TO llrVPOKE 2B48 
♦I.224:NEXT:FOR 1=8 TO 2:VP0KE 2853*1.14 
4:NEXT:RETURN 

528 FOR 1=8 TO E:REAO AS:LOCATE 2.I»D:PR 
INT AS:NEXT:RETURN 

538 • DATA 

548 DATA 3«ENEMY LASER ENERGY DATA.5#MYS 

HIP DAMAGE. XXLANDSCAPE FIELD DATA.W3 

558 DATA 182888382888.184888384888.88981 

BB29BeE3E9el2.1848BB3848B83548a8BB483815 

48282B4818.B44B883C4e348354e83D5334373B3 

8893028.385888885838285888185 888.88 58888 

e6B88fl8878B2B2288282E38.221F2218281C1836 

188849BEB27B8E3C8A1C389CB8 

56B DATA 5.8.4.6.7.5.6.2.6.5.5.5.5.8.5.1 

jt c a A .fli ^i4t S 

578 DATA (( GREYCOLLEAGUE D..THE SPACES 

HIPBASEMENT.OF DSS . FORCE .. "CONTROL DEVIC 

E:"." 1:USE JOY STICK"." 2:CURS0R*( SPA 

CE)*(N)" 

58B DATA "FUNCTION DATA:"." BUTTON 1 :SH 

OT MY MISSILE"." BUTTON 2:L00K RADAR" 

598 DATA " TPM.CO SOFT WORKS 1991" 

688 OATA 05E2O6E2.03C04C03CO4CO3C04C03C0 

4C.E4DC05BAGE.02B03B02B03B02B03B02B03B.G 

AE2E4.02A03A02A03AO2AO3AO2AO3A.E4AGEDCD. 

02G03G02G03G02G03G02G03G.L4E04A05CD.02FO 

3F02F03F02F03F02F03F.L8EEEDCD0 

618 DATA 02G03G02G03G02G03G02G03G.E1 .03C 

04C03C04C03C04C03C04C03C04C .El. 02B03BO2A 

03A02G03G.DCOC1C4.03C04C03C04C03C04C 

628 DATA YOUR=MISS ION= IS=ENDED . ALL=BASEM 

ENT= I S=0ESTROYED.THANK=YOU=FOR= PLAYING. . 

.STAFF. , GAME =DES I GN. PROGRAMMED. ART 

638 DATA BY=1KUSHI=TOGO. . DEVELOPMENT=BY , 

.SHINYA=T0G0.EMG=VT=HALT9958. , . .PRESENTE 

D=BY.TPM=C0=S0FT = WORKS. "= = = = = 1991" 

648 DATA N08ITARKUN.0YAJIE.SINDER NECO.K 
USERRYKAKETER-MESHI . YOKU ILL-PILOT .SUGE-P 
LAYER! .ATTACKER! .MASTER OF GREY 

658 •• 

668 ' GREY COLLEAGUE 

67B ' TPM.CO SOFT WORKS 1991 

68B ■ ■ ~ 



t£6f ©K^T-BAS I CSK3-C7) 



■vz/ymnm 



BHAACD~SHAB2C 
S I NstKfflx-S' 
SHABED-SHACOA 

SHAC0B~SHAC3Q 

BGMUffi 

SHAC36~SHAC86 

BHAC87~SHAC94 

SHAC95-SHACC3 

f£»ig#©SXOfc*0 

SHACCA-SHACD7 

SHACEQ-SHACEC 

SHACFD-SHACFD 

1IJ0^^C7)1^5J 

SHADOl-SHADOE 

SJDHSWDSHt 

SHAE0B-SHAE5F 



BHAE6Q~8,HAE7D 
SHAE7E-SHAEDB 

%^y\\j-5-y 

SHAEDC-SHAEE7 

^0*iJS©-gB 
SHAEEB-BHAFDF 

BHAFEO-BHBOEF 

BHBQ3E~BHB069 

SHBQ6A~SHBQ97 

SHBG98~SHB1 QB 

u- v-mwmiz t ?-$> © 

SHB1 OC-SHBI 4B 

B.HB1 4F-S.HBE91 

BHBE9E-SHBEFD 
§Sl'J7ffl+t- J- 
SHBEFA-SHB3D1 
©Si PfS&JI 
SHB3DE-SHB43C 



VtZt 



mtiitzmft&x 



[TPM.CO SOFT WORKS] 7-7'J?^-ti-V^GRE 
Y C0LLEAGUEj££SI:rU£-t.r^S«ffiZ:*?n-JL/r3!!a 

ain ur us attu ^tt>\ 

S*BC-7 , -AO®ait« 

#Ial=bSCREENllc37c 
ftorLiSCDI3:^-kI>-9'7- 

EJTPMXO50FT WORfcs |9Tl.n«Y fa^-fft^// 




SIN- COSIt^ 

SHB43D-SHB44B 

VRAM^&hJICx-^^ItB 

gHB449~SHB455 

T-'-^^SiSCVRAM^fEii 

SHB4B1-SHB483 

gi^IIJL/— ?V©-SB 
SHB4BC~SHB547 



SHB54B-BHB579 

wmLWr-v 

SHB57A-SHB5E5 

b— If— ffl+1'^^5' ; £fei* 
SHB5E9-SHB749 

L/-+f-©fflH 
SHB74A-SHB78D 

15*— ^©f^BR 
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SHB78E-SHBB89 
SHBB30~SHB8AD 
SHBBAE-SHB90A 
SHB910-SHB95E 
SHB95F-BHB9EE 
SHB9EF-SHBA87 



SHBABB- 
SHBB5B- 
SHBC52- 
SHBD5D- 

SHBDBD- 

2S 



-SHBB57 
-SHBC00 
-8HBD52 
-SHBDBC 
-SHBEB1 



9— ^7XU7 



SHBl 4B-SHB14A 

SHBl 4E 

SHB2F3 

BHB2F4 

VRAMgiSfflz-K-O^ 

SHB2F6 

Is-?-??? 

BHB2F7 

StKMS 



SHB2F8 

BHB2F9 

SHBBEB-SHBBEE 

BHB82F 

SHB9OB-SHB90E 

g«fflffiH 

SHB90F 



^P^ASSISfflx-^ 



mvstt&Ti-y 



• UXKl 

18B>D6vl 
14«>JD22 
188>KTx1 
228>s0sl 
268>GD22 
388MEB2 
34B>pCs1 
388>GSw1 
426>bmt1 
468>3bu1 
5BB>c»u1 
54I>Y0w1 



U«>IfB2 
l5B>Axq1 

i9e>wi 12 

23«>jb12 
27B>sEw1 
316>16x1 
35l>Cb22 
39B>JUx1 
43l>0kq1 
47B>HNt1 
51l>JLvl 
55I>BJ12 



128>Ctx1 
168>Xrt1 
2BB>58v1 
248>oD12 
288>WXu1 
32B>hS82 
368>JYv1 
4iB>UX12 
44B>SG12 
48B>Tus1 
52i>7RB2 
56B>bBr1 



13B>bHv1 
17B>Rvv1 
21«>skxl 
25B>NJ32 
29B>CEt1 
>1Bul 
37B>0x82 
4lB>1b42 
45B>pB22 
49B>Khs1 
53B>bol2 
57B>Luv1 



>Yosl 


596>6ts1 


6BB>xewl 


61B>fRu1 


178>273B 


188>EVIB 


19l>o908 


288>6«Y1 


62B>UEv1 


638>Khj1 


648>eer1 


65B>ViB2 


218>99p8 


22»>bBLB 


231>8m48 


248>U0cB 


»>Ur 1 


67B>Ftt22 


688>idU 


69B>spw1 


25B>UG91 


26B>owlB 


27B>Alc1 


288>JS78 


7BB>72p1 


>Jxwl 


728>8av1 


738>4Xv1 


29«>IQ2B 


3BB>2UA2 


31B>6t91 


328>of68 


>f Ful 


>VM22 


768>eGpl 


77B>EI12 


33B>JBE1 


348>hSEB 


35B>9)a1 


3»>S3L1 


>KM32 


79B>Vmg1 


888>X1UB 


81fl>DBY6 


37B>iEC1 


38B>TBm2 


39fl>nC11 


4BB>hTM2 


82B>tKeB 


>SkBB 


8*8>dRFB 


BS8>7q4B 


4l8>qF31 


428>kV28 


4Sfl>quj3 


44B>04v8 


>nOofi 


878>dRF8 






458>B251 


468>AB4B 


478>IvL3 


488>kbw3 










498>n428 


588>L24B 


518>UK«3 


528>kZB8 


•U7.se 








538>9q1B 


54B>n2iB 


55B>UBq5 


S68>8GG8 


1B>JM3B 


2J>4qcB 


3B>8eK1 


48>Ub2B 


57B>aV72 


588>1TJ8 


:bN7B 


688>E035 


5fl>E2NB 


6(>Di6B 


7B>Xk2B 


8B>lt9B 


61B>oTk1 


62B>1Rr1 


63B>9et1 


648>qJk1 


98>91U2 


188>YB4B 


1 18>HuMB 


128>oPd1 


658>dRF8 


668>LA4B 


67»>nO«fl 


688>dRFB 


13B>fCT8 


14B>qd48 


15i>REE2 


16B>J5s2 











-?7>y9L INFORMATION 



7^i/V)\/*jLy<7+Ux(Dfel\y5 



r 7'<i/-Wb?i'y?' , 7AjlS, 7 
7>^AC«KSntNHaW±ffl 

■ TA^-Hl^i^-trACT'D? 

*"3"S±cffl«*nrL\5 r 7.^ 

■BUS. ^^SCr-9tfi 

^tmsis^fc",, 
m^nntz7-5>&. 

iiS*§ > itKfflx-? 

t7d;orur,t8K7in^u5 r 7.^ 

i/fJUgSffiffilSrax-^jt-HB 

■fftsitj.otizzzmt^z. mm 

ZZfr~X1?fc&(DZ\ iSSf- 

mmiz£z>zntj.z,<DZ\ zamn 

■ 3Ai/ VlirJ-x "J ?+rA£ 77* 
-■tz-^L/rfiSSTS 

r 7.^i/-Wl/xi vWixi#%± 
&t©C&ofcb, t>tPO'PV\.^ 
7-OI/€r77.*-tz-:7L<r. X 

77*--tz-:7<W97?IS. WT 

•x-r 7<7©«g 
SAVE"77'-i';i/S". A 
#x-70*S 



SAVE"CAS : 77-rJbS" 

(CSAVEr-euy&u) 
#©ns3/uru57n^^At« 

»UXS7J ; $ofc<BSL;fri:77J N 

««»SLfcO, BEM5t«iiaCtT 
otUSt, *CDff©«lgfflx-^ 

is. asKftoru^7©7r;i«„ 

^fc. 7a^'^A^J7T53feSlft 
ofcto. -i>f1z-7Ur333^o 

0ffiL^7? 

©SI". if§si,fcu;7D^A;gn 
-S'br<§„ fcfc'U. n-KUfc 
S<l:RUNISU«:U3t„ 
RUNUfcSdilSx-^tf^tJo 

Tj't, fcURUNUrUSofcb. 
fc^Ur5^D-KU^J5t+IS"LM,V 
gogi: r 7^-> -p il/? 1 1 '7 ?+r A j 
£, n-KUrSfc^p^^ACM 
ERGEU=t^o 

MERGEffl^075IS. 7-fW 
fcx-^fcfi&ur, 
MERGE"7T"r;bS" 

^^fi-rnisoK/cfo 

SCREEN0: Wl DTH4Q 



X^^^b^x^^-y-Zx^P^^A 


9000 


SPECIAL CHECK SUM 


9010 


V=PEEK(&HF676)+PEEK(&HF677)*256 


9020 


V1=PEEK(V)+PEEK(V+1 ) *256 : L=V1 -V- 1 


9030 


VS=PEEK(V+2)+PEEK(V+3)*256 


9040 


IF V1=0 THEN END ELSE S=0 


9050 


FOR 1=4 TO L:D=PEEK(V+I) 


9060 


S=S+D*(I-3) :NEXT: A$="" 


9070 


FOR 1 = TO 3:B = 60M3-I) :A = INT(S/B) 


9080 


IF A>35 THEN C=A+61 ELSE IF A>9 THE 


N C=l 


\+55 ELSE C=A+48 


9090 


A$=CHR$(C)+A$:S=S-A*B:NEXT 


9100 


PRINTUSING" ####>& &";VS:A$; :V=V1 


9110 


GOTO9020 


x^yv)^in(Dmmm^-^ 


9000>AH50 9010>8I60 9020>7QD0 9030>C970 


9040>1040 9050>G560 9060>8n40 9070>t7E0 


9080>RrP0 9090>C970 9100>7q60 9110>dE00 



ZmnlsZ&Z, 

@GOTO9G00 

t J for r 7'K->1'JU5 l i'y^trAj 

©HSIzlSoSoSCii^FFjx-^ 

SiOTx-^tSoru-s^ln^T:, 

wzigsbz&zz> a 

RL\7a^^A5«l?-r§i:SIS, 
ISD»©B^0D?-5'^ffiia©±/) x 

6is*»aiur. striy$7it# 

©BlSfflx— ? ff & o r Ufc3i»© 



'J7S«. lX^f^ftAOICxx 

'v^ur*r£U. T-'Zifif-DtzD 

@?n^5Affgtl:Sotb, 
DELETE9DDG-91 1 
£HffL.r. r 7^i>'pJUxi':'?'!7 
Ajro7D^'^Af£IJ?©ClH5<o 

A*-fe-7Ur»<o 

SS, L\S;l,^S;RUNL/rs>d:do 

Sv/vtKKISI'fco fcU. ^tf- 

-iE^ICtMfU^fro/cto. 15- 

zmmzws<[jZfo£z)v 
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H5@MSX-FAN7n?5A3>TXh r 2&B#j IZftttZ 




$r«rc0!»03iui:7^^ 



?P^5A5lffll/fc ^©5 
5, Tie©6*©ftS£, H5 
0MSX • FAN^P?'^A*zi 
>x7,h r E;*li*jBuJfflyS* 
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■Hit by ffl«WSRl(18a) 


NaOE 


^AJU-S'SStiM by UiB9-(19«) 


Na03 


iW-fx-fV?7$'^ by SHUNSUKE(17«) 


Na04 


S 1 LVER SNA 1 L by S 1 LVER SNA 1 L (1511) 


NaD5 


GREY COLLEAGUE by TPM.CO SOFT WORKS(24SS) 


No.06 


-BfgroS by £trM15S8) 
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n^io^Ufc-TMSxa-tr-r, ioi3fii$85f, n^fitfs^r-ss 
R-rsuv^^sys^-s^sso-r^r^is^sAo s«t£U 

a>xXSy~*-Sftffi©ft#fc.fcy*©S8l»JfiSr£SttA,o 

i ) i osiush^ 1 1 hib «*r»£-r s-r^r ©y s*- sf^as^ 

SU y-A^P^5A©**^Eo«)S 

e) i mmw.^w^gj (©) £, n 3if«€cii**n5 r gE#sg 
MS^ffl»(isw j (©) cifio j&mmmtfrtvizhjtj.^x y k^ib 

AUrM7 7>S»gBCSS(©, ©BdSbfePtf-^plo d©^ 
-^ttllE«f8^tfffi3£?¥££ttttfc3:i:, /cLM+olciS^L 

W±©1X B)«bn\fc£fUfc7?K, ±Ms Sc^SgMt&O* 
"To Sfc, ^ffl&frfr£>i$A£liO\ n>x7shi£fi!#£R©ie»r 
a / V S&£©SS7]£33l51l.M> *"To 

S!#§gHfr6£bttr*fc^&T£!lffl«.j£lgltU ^nicd: 
or, «TffiS»£;*£U3:-r<, 

S^x^-'^St i+tKx-O^H, jMx^ii 



tftSHIKDftR 



1 )^#SSM©^^^6ttiir50 : S«C 
•lD€«C r 7v-A-7P=]Ly J (3'7'>^A^±, «flF£t¥ll©^ 
ffS«frO=6E4*il«>fc^XSy-A7a^5A«. Avi7+±ffl 
*^P^AiKS©xy ^^/Slll980P3o 93^-^#$) 

• 10 ; S^lc r x-i'X^^o<0©l^j 

• lD€«C r M77>?ruyx)b*fffflx'r7s^5fttz>>Kj 

• eOS^CM^^V^'jyxJbxLv/KVA-Kj 
E)BBnfc^A©=iy>x-^-C 

• M77>1992^ 1 £1fPPt+It3*L5xn 



Oi^o 3ffl^-^tt, r ^SScSggvyxAjffl@i©iftB^cl:, 
Hc^^SHtbrffi^iUmfcfcXrJ^©^ 1 0©1fl^ffi««gM 




■=7 



)V 



mmm±w/ zn^zizmm^k^ 



V 



3£i¥ : <fco5-^ 
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♦puwo 

fe-fl-MKMMil 



Vn#fro3lMM\/ISX*Mg«fF 



CAMMm 



■*\JV+MI 



Ctf-rcnrUS^Uor, t£Hgg|ic7)7|-Jb# 
m£, VP©gB^^T-V-^- A-^Jl/E 

?)£t>\\m(D'J)'\--J1f\i-y<Ll\^>tZ. 

16 CALLMUSIC(1.0.1.1.1.1.1.1):CLEAR3[1B8: 

S0UND7.49:S0UN[>o. 19 

2B TS="T2B6" : PLAY*2 .T$ . TS . Ti .T$ . TS , TS ,Tt 

■TS.TS 

30 CALLTRANSPOSEl -2BB) 

IB DIM AXM5) 

5B FOR1=0TO15 

6B REABAS :A%< I l=VAL ( "&H"+A$) 

7B POKE&HFA1C30:POKE&HFA3C.40:POKE&HFA4 

C.2B:POKE&HFA5C.5S:POKESHFA8C.45 

8B NEXT 

9B CALLVOICECCIPY(A*.a63> 

IBB DATA B.B.0.B.0B80 .7. B. 0.4141 .22F4.8. 

8B60.6064. 1FFF .0 . t 

11B ABS="V12L8a6303Aiawl" 

12B B0S = -V9L8363O4EiawT 

13B FBS="a3302V13A1L8AAAAA42Y37.24Y21 .32 

au8Y21 . 293U14Y21 .27awUY21 . 253U14Y21 .238 

U14" 

14B PBS = "L8SM15880ClM58BCM58B0f:n500CCM5B 

8BCM5B0CCM5080C" 

ZB3. = "v15tB4ti4e4B4B8BM8B8B8BM8B8B8BI"l8 

16B Al$="V12L6a63Q703AARAARR8A>DCDC<A4AA 

RAARR8AEAHXAGA" 

17B B 1 $="V9L 83630 704EE REE RR8EAGAGE4EE REE 

RR8E<B>EGEDE" 

188 F1S="02L8AAAAAAAAAA>CCDDC<A4AAAAAAAA 

EGAXXAGA" 

I9B Z$="V156868BM4BSB8BM4B8B8BM8B4B8Bn4" 

:Z1*=Z$+Z$:Z2$=Z1S*Z1S 

2I( PS="M58BCCM500BC4I1SB0CCM50B0C4M500CC 

M500 0CM500C4nM58BBC4" : P1S=PS»P$ : P2$=PIS+ 

PIS 

21 B A2S="L604EER8E2RBEER8DR8EEEFEEEEEEEE 

EG+EAG+E6*" 

B2S="L804BBR862R8BRR8AR8BBBBBBBBBBRE 
B>B-KB>ED-KB>D+" 



238 F2S="03EEEEGtG + AE4EEEG + G->AAEEEEEL>EE4 

EG*AAG*EF" 

246 C2t="Q6V150Ll6E106<Bb>D6E6F6E6F6ClAA- 

aba-fe<6>de0ede4.de4.[)e8fa-e - 

25b c3s="06a-feaa-fa-feaa-fa-feaa-fa-fea 

a-fa-feaa-fa-fea32a4-32b1" 

268 f3s = "02a>a<a>a<a>a<a>a<a>a<a>a<a>a<a 

>a<g >g<g>g<g>g<g>g<g>g<g>g<g>g<g>g<f>f<f 

>f<f >f<f >f<f >f<f>f<f >f<f >fc >c< c>c<oc<c> 

c<c>c<c>c<oc<oc<" 

27B A3S="V12a703>A<AA>A<AAAA;a< AA>A<AA>A 

<A>G<GGGGGG>G<GG>G<GG>G<GGFF>F; FF>F'FF >F 

<FF>F<FFF >fcoc< CC>C<CC>C<COC<CCCC" 

288 B3$ = "07V9O4>E<EE>E<EEEE>E<EE>E<EE>E< 

E>D<DDD0DD>D<DD>D<DD>D<D[)COC< COC<CC>C< 

CC>C<CCOCXGG>G<GG>G<GG>G<GG>G<GGGG" 

298 C4S="0 7V15L83606E 1 < GAB>Cl>4 . E2R8G2A4 

G4EDE4EDC< A1 . R8A >C[)E 1 ." 

388 F4$="Q3R>D<[)>D<D>D<D>0<[)>D<[)>D<D>D<r> 

>D<<A>A<A>A<A>A<A>A<A>A<A>A<A>A<A>AD>D<D 

>[><D>D<D>D<D>D<D>D<D>D<D>D<<G>G<G>G<G>G< 

G>G<G>G<G>G<G>G<G>G'" 

318 A4$ = "04DD>D<DP>tKDD0>0<D>D<DD>!)<D<AA 

>A<AAA>A<AAA>A<AA>A<A>AOO>t><[)D)D<DD[)>D<t> 

D>D<DD>[K<GG>G<GG>G<GG>G<GG>G<G>G<G>G<" 

326 B4S="04AA>A<AA>A<AAA>A<A>A<AA>A< AEE> 

E<EEE>E<EEE>E<EE)E<E>E<AA>A<AA>A<AAA>A<A 

A>A< AA>A<AA>D<t>D>D<DD>D<DD>[KD>D<D>D<" 

336 C5S="DEFDEF4E316>DEFDEF4E<36Ct>EC[>E4C 

316>CDECDE4C06[>EF[>EF4.[)EFC)EF4G4AG4AG1" 

346 FS = "DDDDt>ODDDL>r>DDDDCKGGGGGGGGGGGGGGG 

& N ":F5S="03"+FS:A5S="O4"*FS 

356 C6S="36306A1 . R8 >CDC<B1GFGB4GAB" 

366 C7S=">C1<A4.B4. >C4<B1G1" 

376 D6»="a6Q05V9LlFSIWlG3U1" 

386 E6S="a6005V9L1G3W1AaWl" 

396 G6$="360Cl6V9LlCaU1D3Ul" 

486 C8S="06V1S3630L16A2AGEGEDE[>CDCXA>C<A 

GAA>CDEDEGASA2U6G6A6>C6QD4.E2" 

416 D8$="06V12a63R8QL16A2AGEGEDEDCDC<A>C 

<AGAA>CDEDEGA8,A2a6G6A6>C6QD4 .E2" 

4 2B C9S="07G3L48GEDC<AGECAGA-GA->CDCDC<A 

G£DC<A>L 16CDEGEGA-GA-GEGA-GA-GEGA>CDCDCL 

24Ct>CDEDEDC<A>CDE-DC<A>CDE-DC<AL16GEGE[>E 

GEE-CDE" 

4 36 D9S="07R8G3L48GEOCXAGECAGA-GA->CDCDC 

<AGEPC<A>L16CDEGEGA-GA-GEGA-GA-GEGA>CDCD 

CL24CL>CDEDEDCXA>CDE-DCXA>CDE-[>C<AL16GEGE 

DEGEE-" 

448 CA$="06L16EDEGEGAGA>C<A)DCDE1E-E2.SE 

A8GEG8EDE8DCD8CXAEGAG" 

4 56 DA$="06RSL16EDEGEGAGA>C<A>[>CDE1E-t: . 

&EA8GEG8E0E8CCD8CX AEG" 

466 CB$="L1606E12A-12A12B1AFEDEFAB>DEDED 

<A-BA-FED<BAEFA-EFA-BA-FA-BFA-AB>D32E4" 

4 76 DBS="R8L1606E12A-12A12B1AFEDEFAB>[)EI> 

ED<A-BA-FED<BAEFA-EFA-BA-FA-BFA-AB>D32E6 

486 CC$="06A-BA-FE8A-8A-FE8A-8A-FE8A-8A- 

FE8A-AA-AFAA-AAA*32BlaU4L54B6-AA-GG-FEE- 

DD-CL16" 

498 DCS="R80oA-8A-FE8A-8A-FE8A-8A-FE8A-8 

A-FE8A-AA-AFAA-AAA«32Biau4L54BB-AA-GG-FE 

E-DD-CL16" 

5BB CDS="a24L8GEDER8GAGGA CDCDEA4 >C< AGAG 

E0EGAGR8GA>C". 

516 CEt="R8Cs AGAGR8>CR8CXAGAGR8GR8EDEGE[> 

ER8CDEGEAG" 

528 CF$ = "AGA>CXAR8>CER8GEDEDC<AGA>CtKA>C. 

DE4DEDR8EDC 



536 CG$="DC0EDR8EGR8GAGR8GA>c<AGEDR8EOCD 

CDGR8GAG'" 

546 PLAY#2.A0S.A8S,B0S.B8S.A0S.FBi.Z8$.P 

BS 

558 PLAY#2.A1S.A1$.B1S.B1S.AU.F1S,Z1S.P 

1$ 

566 PLAY *2.A1S,A1$, BIS. BIS. A1S.F1S.Z1S.P 

1$ 

576 PL AY#2 . A2$ . A2$ , B2S . B2$ . C2S . F2S . 2 1 S . P 

IS 

586 PL AYt2 . A2S . A2S . B2S . B2S • C3S . F2S . 2 1 S . P 

11 

598 PLAY#2.A3S.A3S.B3S.83S.C4$.FSS.Z2S.P 

2S 

686 PLAY62.A4S.A4S.B4S.B4S.C5S. F4S.Z2S.P 

2$ 

616 PL AY#2 . A3S . A3S . B3S . B3S . C4S . F 3S . Z2S . P 

2S 

628 PL AYt2 . A4S . A4S , B4S . B4S . C5S . F4S . Z2S . P 

2S 

636 PLAY#2.A5$.D6S.E6S.G6J,C6S.F5$.Z1S.P 

1S 

648 PLAY#2.A5S.D6S.E6$.G6S,C7S.F5S.Z1S.P 

1$ 

658 PLAY#2. A1S.A1i.B1S.B1$."Al . " .F1J.Z1S 

.PIS 

666 PLAY#2 .A1I.A1S.B1S.C8S.08S.F1S.Z1S.P 

IS 

678 PLAY#2.A1S.A1S.B1S.C9I.D9S.F1S.Z1$.P 

IS 

686 PLAY#2.A1S.A1S.B1$.CAS.DA$.F1S.Z1S.P 

U 

696 PL AY#2 . A2S . A2S , B2S .CBS.DBS.F2S.Z1S.P 

IS 

786 PLAY#2.A2S.A2S.B2S.CCS.DCS.F2S,Z1S.P 

IS 

716 PLAY#2.A5S.D6S.E6$.G6$.Ct)S,F5S.Z1$.P 

IS 

728 PLAY#2.A5S.D6$.E6S.G6S.CES.F5S.Z1S.P 

IS 

736 PLAY#2.A5S.D6S.E6$.G6S.CFS,F5S.Z1S.P 

IS 

746 PL AY #2 . ASS . D6S .E6S.G6S.CGS.F5S.Z1S.P 

IS 

756 PLAY#2.A1S.A1S.B1S.B1S,"A1 ." .F1S.Z1S 

.PIS 

766 PLAY#2.A1S.A1S.BH.B1S.A1S.F1S.Z1S.P 

IS 

776 GOTO 578 
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fflx^;fflXr r MAN MACH I NEjt 
fr r EUROPE EXPRESSjtl.ofc 



IB CLEAR21 SB: CALLMUSICIB.B. 1.1. 1,1. 1.1-1 
• 1,1) 

2B CALLBGMI 1 ) :C.ALLTRANSPOSE ' Bi:CALLPIT 
CH(443i 

3B DIMT56(15> :LiEFFNT = VARPTRiT*l 8 I i 
4 6 G0SUB1 1 2B: CALL V01CECC1PY I TX , 51631 
58 P0KESHFA3C. 14: POKE&HFAoC . 14 : P0KE&HFA8 
C,22:P0KE&HFAAC. 12 

6B R=99:A=10:P=11:C=12:D=13:E=14:F=15:G= 
16 

7B DIM AStR) .B$!R) . C$ I R ) , DS I R) .E$(R1 • F$ I 
R) 

8B DIM 0$< R) .HSIR i . I$( R] . JS 1 R I 
OB T 3. = " T 1 a £ " :PLAY#2.T$.T$,TS.TS .TS.Tt . T3> 
■TS-TS 
IBB ' 

1 IB ASIB ' ="S3V15" :BS<0 i="S3V12" :CS( 0)="B 
3V1IT 

12B DSI 0l="i)63V14" : 0$ I 8 I ="a63Vl 2" : ES I B I = 
"333" :FSI0 >="B33" 

13B E$I1 i="L802VB6-V1B-V2B-V36-V4B-V5B-v 
6B-V7B-V8B-V9B-V1 BB-V11B-V12B-V13B-V14B- 
V156-" 

UP AS I 1 i =" L 1605B-6SE-A-R8B-88B-A-R8B-B- 
A-R16" 

15B BSI 1 >="L 1605F8&FE-RBF8&FE-R8FFE-R16" 
16B CS l 1 I ="L1604B-8&B-B-R86-8S6-R-R86-B- 
B-R16" 

176 ESl2i="L8a28BBBBBBP" 

18B AS(2i="L8B-SB-16A-16R8B-SB-&B-SB-SB- 
&B-&B-S6-&B-S6-&B-B-R8" 

190 BSI 2 l="L8FSF16E-loR8F&FSF&FSF&FSFSF& 
FSFSFFR8" 

2BB CSI2)="L8B-&B-16B-16R86-S6-8B-SB-&B- 
&B-&6-&B-&6-SB-SB-B-R8" 

216 DIM ="R8R8R8R8R8R8R8R8L8056-SB-16A- 
16R8B-S6-SB-SB-16L32>CD-E-FGA-" 

1111] ="R8R8R8R8R8R8R8R8R16L805B-S&- 1 
6A-16R8B-S6-SB-L32>CD-E-FGA-" 
23B ES(3)="L802B-B-6-6-B-B-B-B-6-B-6-B-B 
-B-B-B-" 

24B DSI2i="L6S- SB -SB-&B-SB-&B- SB-SB-" 
25B 0$I2>="L8R16B-SB-&B-SB-SB-SB-8B-&B-1 
6" 
26B D$(3i="L8«-SA-SA-SA-E-SE-SE-SE-" 

IS ( 3 i ="L8R16A-fcA-&A-&A-E-&E-&E-8E-16 

28B DS(4)="FSFG-FSFSF8F8FSFSFSFSFSF8F8F3 

2L32<6- >CD-E-FGA-" 

2Q« 0SI4)="R16FSFG-FSF&F8F&FSF&FSF8F8FSr 

16SF32L32' B- >CD-E-FGA-" 

3BB DSI51="L8A-SA-SA-&A->D-&D-SD-&t>-" 

0SI5)='"LSR16A-SA-&A-8A->D-Stl-SC-S0-l 
6" 

32B A$( 3 i="L8B-SB-16A-16R8B-SE-86-SB-8B- 
B-&B- SB-SB -R8R8R8R8" 

E SI 3 J ="L8FSF16E-16R8FSFSFSFSFFSFSFSF 
R8R8R8R8" 

li3)="L8B-8B-16P- 16R8B-SB-86-SB-SB- 
B-S8-&B-&B-R8RBR8R8" 

i <6l="L8066-SB-&8-S6-S6-SE-86-SB-SB 
-SB-SB-Sb-R8R8R8R8" 

Sol QS(6>="L806R16B-&6-S6-&B-&E-S6-S6-SB 
-SB-SB-SB-Sb-R8R8R8R16" 

37B AS(7l="B16D5l8Vl r FFB->p-C:A-E-FD-E-C 
D-<8- >C< A-E-" 

BJ(7)="B1605L8V1BR16FFB- D-C A-E-FD- 
E-Cr;-'B->CiA-E-16" 

S , 7 l -"S116V13L804F&F&FSFSF&FSFSFFSFR 
FtlF&F&FSFSF" 

4 06 0S<7]="ai6V18l8Cl4E-SE-&E-SE-SE-SE-SE 
-&E-E-SE-SE-SE-SE-SE-SE-SE-" 
4 IB AJ(8i'"FSFSFSFSFSFSFR8R8R8R8R8R8R8P8 

42B B$(8 i ="R16FSFSFSFSFSFSFR16RSR8R8R8R6 
R8R8" 

AS<41="05FFB->[>-CD-E-FD-E-CD-<B- ' « 
-B-&B-&B-S8-&6-&B-&B-SB-&E 



B$(4)="05RT6FFB->D-CP-E-FD-E-CD-<B- 

C<A-6-&B-SB-SB-SB-S6-SB-&B-S6-16" 

458 CS(91=CS(7)-tCS 17 I 

w_.B Q3.I9 ) =QSI7l+aS<7l 

4 76 a$="L804E-SE-SE-8E-&E-SE-&E-&E-R16>F 

E-B-FE-B-FE-16" 

48B 0SI9)=0$(7>+03 

496 E$<4 i =ESI3> +E$(3I 

5BB DSI7 i="ai6V1BL805R8R8R8R8R8R8R8R8R8R 

8R8R8R8R8R8R8R8R8R8R8R8R8R8R8FE-B-FE-B-F 

E-" 

516 A$(A)="V1505L8B-S6-A-E-&E-SE-&E-SE-R 

8B-A-E-B-A-E-SE-" 

• BIIA)="V1305L8R16B-8B~A-E-SE-SE-SE-S 
E-R8B-A-E-B-A-E-&E-16" 

53B CS(A/="V1205L8FSFE-<B-SB-SB-&B-SB->R 
8FE-<B- >FE-' B-SB-" 

54 B DS(A1="B-FE-B-FE-B-FE-B-FE-B-FE-B-" 
558 0$IA)="05R16B-FE-B-FE-B-FE-6-FE-B-FE 
-B-16" 

568 DS(C)="BF+EBF+EBF+EBF+EBF+EB" 
57B 0$(C)=" R1oBF+EBF*EBF+EBF+EBF+EB16" 
58B DS(D)="FtEBF->EBF*EBF + EBF*EBF + " 
59B QS[Di="R16F+EBF»EBF+EBF+EBF+EBF*16" 
6B6 D$(B)="FE-B-FE-B-FE-B-FE-B-FE-B-F" 
61B 0S<B)="R16FE-B-FE-B-FE-B-FE-6-FE-6-F 
16" 

626 AS(Bi="05L8B5BAE8E8ESE8ER8BAEBAESE" 
638 BSI 6 l="05R16L8B&6AE8E&ESESER86AEBAE8 
E16" 

64B CS(B)="Ci5L6F*SF + E'B8BSBSB8E>R8F»E<B> 
F + E< B&B" 

656 E$(A)="L803C+C+C+C+C*C+C*C«C*C+C+C+C 
< i-c+C*" 
66B A$!C )="05L8BSBAESESESESER8BAEBAEF+" 

076 B$IC>="a5R16L8BS6AESESE8E8ER8BAEBAEF 

♦ 16" 

68B CS(C)="05L8F4&F»E<BSBSBS6S6>R8F+E<B. 
F fEC+SC*" 

696 AS = "D< F+ >C»<F + BF+ >C*<F + ": ASID I =AS-»" 
"+AS 

7B6 BS="R16P<FOC-KF + BFOCt<F*":B$ rD)=6S 
*•■ "+At«"16" 

716 CS = "Ft<B>E<8>0<6>E<B" :CS(D i=" "+CS+" 
:"+C$ 
7*26 ESIC) =E$(2 I+ESI2 j 

■>i = "D5F*<B>E<B>D<B>E<B":AIIE )=AS*AS 
Ti-l SSIE ; = "Plfi"+AS + AS-t"16" 

:i="05D<F+>C+<F*BF+>p+<F»":CS(E)»C*+ 
CI 

768 A$lFI-"05()-iF>C<F6-F>C<FFD-E<E->D-<R 
- >E< B-" 

77 6 BSIF) ="05R16p-< F >ts FB-F >C<FFt>-£<6->0 
-< E - >E< b-16" 

788 0$(F)="05D-<F>C<FB-F>C<F>D-<F >C<FB-F 

>C<F" 

79B HSl 1 > = "ol63V15L805B-&B-&B-SB-8B-SB-8E 

-B-16>C16D-&D-&t>-6D-&D-8D-8D-D-16£16" 

86 6 ISM>="a63Vl5L805R16e-SB-S6-SF-SB-SB 

-&B-B- l6.'C16l>-SD-SD-SD-SD-SD-Sn-Fie." 

818 D$(F)="L8D5B-FD-B-F[)-B-F[.-B-F[>-B-FD- 

B-" 

82B DS(G)="L805FD-B-FD-B-FD-B-FD-B-FD-B- 

r- 

I4(FI="R16L805B-Ft>-B-FD-B-FD-B-FD-B- 

FD-B-16" 

84 6 al(G)="R16L8O5FD-B-FD-B-FD-8-FD-B-F0 

-B-F 16" 

151 ESIF l="L8D2B-B-B-B-B-B-B-B-B-B-B-B-B 

-6-B-B-" 

■ 61 HS i : ■ i ="F&FSFSFSFSFSFSF" 

87B l$(2)="P16FSFSFSFSFJ,FSFSFle" 

886 PLAY#2' A3. I 8 1 .BJ< B I .C5.1B ) .DK8) .0$IB I 

■ E S 1 8 ) ■ F J. I 6 1 

i >« PL AY* 2. At I R) . BJI Rl .CIIR I .D$(RI ,0$(RI 

.Ellll.iS 

96 8 PLAY*! ,AH 1 i . B$ll J .C$' 1 ' .D$ I R ' -OK Pi 
■Ei(21 ,E$(2i 

! t play#;.a1! i i ,b*i 1 1 .r;si i i .mi Bi .ci$ie> 

■EJ'2! , E$(2 

92B PLAY#2.AS.I2I ■ B$ t 2 l -CS(2) . D» I 1 I .0$! 1 I 

• E 1 ; 3 ' . E * ' 3 

'_AY#2. A J i 1 ; , BS( 1 ) .C$1 1 I , OS ( 2 i .HI2i 
, E % 1 2 ) . E i : 

941 PLAY#2iA$(l ).B$( 11 .C$( 1 I .B*(3) .0$<?) 
, ES ( 2 ) . E$ C 2 1 

956 PLAY#2. AS ( 2 i . BS I 2 I . CS ! 2 ) . OS I 4 I . 0% i 4 ■ 
. E J ( 3 ) . E$ ( 3 

966 PLAY#2.ASili.BSi1i.C$lli,DS(2I.QS:2 
.ESI 21 . E3 i ; 



97B PLAY#2. AS l 1 l , BSl 1 I .C$11 ) . DS ( 5 I .01(5) 

. ESI2) .ESI21 

988 PLAY#2.AS(3) . BSl3i .CH 3 ! .DSI6) .0$(6i 

, ES13) .E4I31 

998 PLAY#2.A$(7I .BSI7) ,CS(7 ) -DSIRi .0S(7) 

■ESI3I ,ES(3) 

1BBB PLAY#2.A$I8I . BS I 8 ) . CS I 7 1 . DS I R I . OS ' 7 

I • E S I 3 ) .ESI31 

IBlr PLAY«2.A$(4).BS(4I.CSI9).DII7).0Sio 

J , ESI4 ) .ESI4 l 

1B2B PLAY#2.A$IA) • BS I A ) . CS i A ) . DS I A I . OS I A 

i .EI 13) .ESI 3) 

1B3B PLAY#2.A$IA) . BS I A ) , CS ! A I . DS I B I . OSIB 

i . ES I 3) . ESI3 i 

1B4B PLAY#2.AS(B) • BS ( 8 I . CS ( B) .DSIC) .0S1C 

i ■ FS I A) .ESI A) 

1B5B PLAY»2. ASIC) . BSIC ' .CSICI . DS I D ) .Q$(D 

I .ESI A) .ESI a: 

1B6B PLAY#2.ASID) . BS I D ) . CS I D ) . DS ( C I . 0$ I : 

) .ESIC) .ESIC) 

1878 PLAY*2.AS(E ) . BS I E I .CSIE I . DS I D ) .OS ID 

i • ESIC I .ESIC1 

1B8B PLAYt2.ASIFI.BSIF) ,C$IF).DS(F).Q$(F 

) .ES(F) .ESIF ) .HSI 1 I . !S( 1 I 

1B9B PLAY#2.ASIF) . BS I F ) . CS ( F 1 . DS ( G ) . OS I G 

) .ESIF) .E$(F) .HSI2) . IS12I 

1186 PLAY»2.A$IB) . BS I 8 I .CSIB) 

1116 G0T09BB 

1128 READD$:FORI=BT07:PDKEFNT+I .ASCIMIDS 

IDS-f" ",1*1.11 I :NEXT 

113B READD:P0KEFNT + 8.[>*256:P0KEFNT»9.DMO 

D256 

114B READA.D:P0KEFNT4 17.63-A:P0KEFNT»1B. 

1 5-01*2: F0RI=8T01 
1 158 A = 8:FOR.I = BT03:READ(i:A=A+0*2-(7-J) :N 
EXT: READD:P0KEFNT+16+I«6. A* 15-1' 
1 16B READD: A=PEEK( FNT+17i«l 1-1 )+ (3-D l«6* 
:P0KEFNT417*1*8.A 

l 17B F0RJ = BTD1 :READA.D:A=(15-A)*I6-H15-D 
l:P0KEFNH18-»J*l*8,A:NEXTJ,I : RETURN 
1188 DATA "POCOPEN". BB.31 .80 

DATA 68.06.08 .88. I 3. B3. 1 .04.16.11 
1208 DATA 00.08.01 .88 • 14. 03. E ,14.15,14 



!8S3lg«^;t&l\gt*<-i 



37- = 



r STAGEI BGMj 



MSX©v7S^ic>!7^strnrnt35 

UXA-7l<yy\ XD?-f©bf->5 1 "\> 
Ai-y->A*-7t\'f'i'XJb©^L/-f^S:i:\ g 



I 16 

128 

136 

146 

15B 

160 

176 

188 

-CAI 

196 

200 

216 



IYUME 1AIRIKI.I4-H 
H-H-H-ADVENTUREH 
I STAGE l+b . G.M.H 

1 1 1 1 1 1 1 1 1 1 1 1 II II 

I PROGRAMMED BY-H 
P+++J L 2 T B BH 



CLEAR2B46:CALLMUSICi 1 ,0 

LTRANiPOSE I 3 1 

PLAY#2- ' 

PLAY*5 ,"YB, "*:-.TRS(&BBBBI 

PLAY#2."Yl."t5TRSlSBB08l 



1,1.1,1.1.11 



118 I 

001 B I 



Notes' notes J-v-J-y 



■■■JL2TBB 

orLi5*s^-73-r^aisact 






-E-0*. GAUPU^iotz^tt-oZn 

■■■GANP 
3*hit!.[zV}h-ft&GAUPU-zi$-hJl 

y^.-tm&oy-c-^^O'JT.zi- 

7^ : r7,tlAjtzfil-'/vtz<H.\z>m& : bl% 



•E-niSi:tfr<. GANP<pyaz>l\ 
vt>>ii, ccr-fe'PliO, s*tt 



70 



msm 



Af#2."Y2,"+STR$l&B0800 
230 PLAY*2,"Y3," + STR$l&.600B8 
241 PLAY#2,"Y4,"+STR$!SB81 10 

"LAY#2,"Y5,"+STR$I&B180B 
260 PLAY#2."Y6."*STR$(SB1 11 1 
278 PLAY#2."Y7."*STR$I&B1800 
280 DIM ASI5 ) .B$( 5 I .C$15) .D$ 
( 5 I . RS ( 1 ) . PAS I 5 ) . PBS, t 5 ) • PCS. ( 
298 '^«.=rT 7U»» 

300 V1S="SY0. 70S" 'turn on vi 
318 V0$ = "£Y0.6F." 'turn off v 

320 ' MELODY 

33f A$(0 ""T130V14O7" 

J4B A$l 1 i="L 1604F8G6FEC>C8C8 

0$<"i 16<6-6-8GGB-Y0 .7A-8G8Y8 

AII2>="F8E8FEFG>C4."*V1$ 
Y8-5B-G4.R8Y0.6F" 

I AS(3)="F8E8FEC>CSC8"*V1$ 
16<B-B-8CGB-YB.7A-8G8YB.5A-G 
37B A$I4)="F8E8F >CG >C&C4 
"<B-G6G4&L32G&Y16.B&G&Y32.24 
6.25B&G&Y16.24 5&G&Y16.248&G" 

388 ' BASS 

398 B$<0I="T138V13L16Q6312" 

4BB Bid )="03C8C8.R16<G>C<B-B.B-FFB-FA-8 

A-8A-8E-A-B-8.FB-FEF" 

41B B$(2I=LEFT$IB$< 1 I .46H--A 1 

420 BS(3)="03D8D8.R16<A>DC8. 

B-8B-8FB->C8 .<G>C<GF+G" 

430 B$I4)=LEFT$(BS(3) .47) t"B 

44B ' CHORD 1 

458 C$I0)="T130V13O5O6314" 
461 C$11 )="R4E4R16D16R8D4R4C 
478 CS(2>="R4F+4R16E16R8E4R4 

488 ' CHORD 2 

498 D$l0>="T130V12O5O6ai4" 

I 1 1 l="R4C4Rlo<B-16R8b-4 
R88-4>" 

510 D$(2)="R4[>4R16C16R8C4R4< 
C4" 

52B ' CHORD 3 

5SI E$<e)="Ti3evi204Q6ai4" 

548 E$(1 )="R4G4R16F16R8F4R4E-4R16F16R8F<> 

I «, <2)="R4A4R16G16R8G4R4F4R16G16R8G4" 



1101 ) 

0880 I 

081 1 ) 

08BB) 

1111) 

1111) 

(5) .EJUS) ,FI 

51 

hrato 
I b r a t o 



"+V1$*~C2"+V 
5A-GFEY8 .6" 
"C2"*V8$t"< 

+"C2"+V8$*"L 
FEY0.6" 
1$+"C2"+V04* 
Y16.255&G&Y1 



B-B" 
<G>C<GF+GB-8 



R16D16R8D4" 
DR16EI6R6E4" 



R4A-4R16B-16 
B-4>R16C16R8 



568 



-COUNTER MELODY- 



c 70 F$( )="T13BV120407a24L2" 
58B FSC 1 l="GFE-F" 
598 F$I2)="AGFG" 

688 " RHYTHM IFMi 

618 RSI0 ) = "T I38V1 r " 

620 RS! 1 )="B6.B16B8M16M16B8.B16B8.B16" 

631 RS' 1 )=R$f 1 I tRSI 1 ) 

64B ' RHYTHM I PSG I 

658 SOUND 7.&B1 10001 :S0JND6.9 

668 PA$(8)="T13eSBL16" 

678 PPS="M30 0CCCCM30B0CM30 0CCC" 

688 PE$=LEFT$iPD$.2B ) +"V1BCS0" 

OOP PASI 1 ) =PDS»PE$*PD$tPES 

7BB PA$(2)="R1M1000C32C32CCCM1500CCCCM20 

B8CCCCM3B00CCCC" 

7 10 PAS 13) ■PDS+PE$+"M3B88CC8CCC8CCC8CC8( 

8" 

720 ' ARPEGIO 

730 PBSI0 ) ="T13BL 16V1204" 

74 PBS l 1 >="CG>D<G>DEC<<B-8>F>C<B->CtKB- 

8<A->E-B-A-B->C'.E-<B-8>FB-FB-AB-P" 

750 PB$(2)="DA>E<A>EF + rKC8<wOCDEC8' B->f 

>C< B- >CD< B-C8G >C< G >C< B >CC+ < " 

760 ' GRISS. 

778 PC$(0)="T130V13CI6L32" 

788 PC$(1 >="EE-D0-C<BB-AA-V12GG-FEE-DD-C 
Bt-AA-V11GG-FEE-DD-C<V12BB-AA-V1BGG-FEV 
9E-DD-C" 

790 PC$!2l="V10L64R1O7DEDEOEDEDEDEDEDEDE 
DEDEDEDEDEDEDE<6AGAGAGAGAGAGAGAGAGAGAGA> 
DEDEDE"' DE=16.GA=12.DE=3 
8B0 PC$(3)="V12Llo" 

1800 ' PLAY MUSIC 

1818 PLAYt2 . ASl 1 , BSI I . C$ ( ) . DS I J , ES ( 
) ,F$C 0) ,R$<0 ) .PAS(0) .PBS I 8 I .PCS I 8 I 
1820 PLAY#2."" .Bill),"" 

■ PASI2) , PBSf 1 ) i PCS! 1 ) 
1838 PLAY*2-"" .85.(1)."" 

• RSI 1 ) .PAS I 1 I ,PBS( 1 ) 
104C PLAY#2."" .BSI 1 i .CS( 1 ) .DS( 1 I ,ES(1 
l ."" .RSI 1 ) .PAS I 1 ) .PBS( 1 ) . PCS (3 UBS ( 1 ) 
1050 F0RI=1T02 

I860 PLAY#2."" -BSI 1 . .CSI1 1 .[)$( 1 I ,ES(1 
) .Fill i ,RSI1 I .PAS II ) .PBS'l ) . BSI I I 



1070 
1 ,F$ 
1888 
1 ,FS 

10Q0 
) .FS 
1 100 
) ,FS 
111B 
) .FS 
1128 
1138 
) .FS 
1 148 
) .FI 
1 15B 
) .FS 
1 160 

117B 



PLAY#2.AS( 1 ) 
I 1 ). RSI 1 I .PAS 

PLAY#2. AS12) 
I 1 ) .RSM ) .PAS 

PLAY*2.AS(31 
I 1 ) .RSI1 I .PAS 

PLAY#2. ASI4) 
( 1 I .RSI 1 ) .PAS 

PLAY#2."" 
ID.BII1] .PAS 

NEXT 

PLAY#2."" 
( 1 ) .Mil ) .PAS 

PLAY#2."" 
(2 i -RSM ) ,PAS 

PLAY#2."" 
(2) .RI( 1 1 .PAS 

PLAY#2-"" 
• RSI 1 ) .PAS 

GOTO 1B4B 



.BSI 1 ) .C$1 1 1 -DSI1 I 
I 1 ) . PBS ID.BSIl) 
.B$(2) iCJIll .DSI 1 I 
I 1 ) .PBSI1 ) .BSI2) 
,B$I 1 ) .C$( 1 ) .DSI 1 ) 
II ) .PBS II I .BSI 1 ) 
.B$(2) ,C$( 1 ) .DSI 1 ) 
I 1 I .PBS( 1 ) .BSI2) 
.BSI 1 ) .CSI1 1 . DStl I 
II ) .PBSI1 I .BSI 1 ) 

.BSI 1 ) .C$1 1 ) .DSI 1 ) , 
( 1 ) .PBS l 1 I .BS( 1 l • 
.B$I3) .CS(2) .DSI2) , 
(1 ) .PBS (2) .BSI3) 
.BSI 4) .C$12 I .DSI 2) . 
(1 ) .PBSI2) ,B$<4> 



ESI 1 

ESI1 
E$I1 
Ell 1 
E$(l 

ES. r 1 
ES 1 2 
ESI2 



13) , 



. PCS I 2 ) 



WK VXA -32fcf— S©*'J SWU 



NEWROBEAT 



)\szn\s£:&ftm&-£mfr<uxAmihj-ez> 
vtttimmzAjCDF.oBtwp-jztzti. 

Q(t:A»fcl6bf-S?-r. 

10 ' Neurobeat 

28 CALL MUSIC I 1 .8 ,1 . 1 . 1 . 1 . 1 . 1 ) :CLEAR20B0 

30 ' Composed bv GANP 

40 DIMA%< 15 ) :FORS=0TO15 : READAi : A* I S i=VAL 

("&H"+A$> :NEXT:..VOIC.ECOPYI A%.a63) 

50 DATA 4F56. 4349, 2D45. 204E .0. 1A. 0,0, 542 

1 , 32D3. 0.0. 8042. A7EC0. 

68 DEFSTRA-U:S0UND7.6B1 88001 : S0UND6 . 1 : T= 

"T150" : PLAY#2.T.T .T.T.T.T.T.T.T 

70 PLAY*2."B63M6V1 1< <" . "36Y33 . 3204L8V " 

."S6Y33.3204L8V7>" ."89Y35. 32d5L8V9> >• ."a 

9Y35.3205L8V7>>" , "SI16L1 6V506 > '. " ."V2SA10" 

•"L32S0" , "L32V13 

80 POKE&HFA4C.30:POKE&HFA6C34 

90 ' MML Data 

180 A="G8>GGR16G<G >G >D-D-R16CR16< B-R1 6F< 

G8>GGR16GFGR16B-R16G8.<GG" :A1«A+A 

110 A2 = ">D8>D8.^ De>D8<D>D8<D8>DI><C >CflCR^ 

ie-8>B-<B-A>A' A8" 

120 A3="G8>G<GB-8>6-< B- '<C8H'<CD-8M>-< D-D 

D>D8<DD>D8<<F8>F<FF#8>F#G< " 

!30 A4="GGGGG32G32G32G32GGGG>F8<GG>GS< G 

GGGG32G32G32G32GGG8>FF<G8 >GG<" 

148 B4 = "S3G136B-4A4GR4.33>{>- .<G16&G2.a6B 

-4>C4<" :B1="36GR4 . " +B4 : B4=" R2" +B4 

150 B2=">L16DR16DR8DR16DR16DDR16DR16DDCC 

R16CRL8<B-4A4" 

160 B3="R8GR8B-R8>CR8D-R8DDD07F16R16F16R 

16F16R16F#16G1604- " 

170 C4="83H16G2...O6F+E4DR4.a3Rl6>0-.<G2 

. B6F4G4" :C1 ="36DR4 . " +C4 :C4 = "R2" + ':4 

180 C2="L 16AR16AR8AR16ARI6AAR16AR16AAGGR 

16GRL8F4E4" 

190 C3="R8DR8FR8GR8A-R8AAA>0 7C16R I6C16R1 

6C16R16C#16D16<04" 



200 Dl=" >D-16R16C16R16< B-1 6G16R16 ^C . < B- 1 

6R16G16FR16G. B- .G2b->C. D- . < B-4G4F >D-8 . D 

<G28,G16." 

210 D3="G4B-4>C4D-4D2F4F16G&G32<" 

220 D5="L16GFGGGFGFGGGFGFGGGFGFGGGFGAB-> 

C8<B-AFL24GAB->CD-D2.&DCDC<B-L32Cl7^C<B-A 

G05L16FD2&D" 

230 D6="FGB.FG8. FGB-GFG8. FGB-GL320 8FGB-G 

FGFGB-GFGFGB-GL160 5GAB- >C< R1 6B-R16G >FR16 

<GR16>G<G8. L24>DC<B- >C< B-AB-AFL8G2&G" 

240 E1="R32"+D1 :E3="R32"»D3:E5="R32"tD5: 

E6="R32"+D6 

250 F1="GFGB-GFG>C<GFG>D-<GFG>D<GFG>D-<G 

FG>C<GFGB-AGFG":F1=F1+F1 

="HB32HB32B32B32B16Bl6HM!8B32B32Blo 
HB32B32B32B32B8HM!8B8" :R1=R+R+R+R 

?="HMI B32B32B32B32HMI8 . HM! B32B32B32 
B32HM!8HM!16HM!B32B32B32B32HM!8HM!32B32H 
M!32B32"+R:R3=R+P 

280 P="M2BBC8C16CCM34B0C8M208C16C16C8C16 
CCM3*8 8C8M2BBCCCC" :Pl=PtP*P+P:P3=P+P 
298 P2="M34BBC16C16M20BCCCCC16M348 8C8C8C 
16M20BCCCCCCCCM3400C16C16"+P 
50 8 Q="R1 >CR32<CR16. ^CR32<CRlo. >CR32<CR3 

2>CR32<CR32>CR32'CR32R" :01=l)*u 
310 ' Play 

320 PLAY#2.""."R2B-4>C4<" . " R2F 4G4" . - " . -- 
."" .R.P 

338 PLAY#2.A1 .B1.C1."",-"."",R1,P1,Q1 

340 F0RX=1T02 

350 PL A Y*2 ■ A2.B2.C2. "".""."" .R2.P2 

360 FORY=1TOX 

370 PLAY#2.A1 .B1.C1.D1.E1.F1.R1.P1.Q1 

388 PLAY#2.A1 .Bl .CI .D1,E1.F1,R1,P1,(jl 

398 NEXT 

408 PLAY*2.A3.B3.C3.D3.E3."" .R3.P3 

410 IFX=2THENNEXT:GOTO440 

420 PLAY#2,A1 .B4.C4."". "","". R1 ,P1 ,Q1 

430 NEXT 

44 PLAY#2,A1 .B4.C4.D5.E5.F1.R1.P1.Q1 

4 50 PLAY#2.A1 .B1.C1.D6.Eo.F1.R1. PI, 01 



460 PLAY#2.A4. 
."".R3.P3 
470 GOTO330 



'Rl .B-4A4" ,"R1 . F4E4" . " 



"75>^-+f^A'ISLi7b>y 



wMU 



—tSM+^'JVi-lVPWyi 



tz-%mht.ts\ ^n.yJJCDmMjtlt-Dtc 

mm£W<anzm&i;^-3vz : b5tt%tz 



18 CALL MUSIC! 1.8.2-1 


.1.2) 


20 CALL BGMI 1 I 




30 CALL TRANSPOSE I - 


321 ) 


48 CALL TEMPEP' 6 




5« CALL PITCH 1436) 




00 CALL VOICE! !' 4.321 


ii 8. 


78 ' 




80 CLEAR8BB 




90 DEFSTR A-, 




100 ' 




1 10 A0="T188O5L 8V1 10 





8.B12 .B14.323! 



nZHtf-trbMMLlZisZL^futd?: 

•5 ?-t„ m%<o%mmmav'v^y'( 



I>x-f7.K„ 70A-1z>S<6UB 

■ ■■SSBSUitti 

Z Z ?t,$S?7®1 6M©«Ke *4. 



i^i-j--DZz>^3.—yi/vyututztt 

MIDI ffiUtf3.U&5D 



71 



12B BB="T18606l 8V120?" 

136 C0^"T186O3l 8V18Q5" 

HI D8="T18601L 8V1S07" 

156 Z0="T180V 63A 9" 

166 ' 

17B A1="BF-tB4BGB4B<6'.D-tF*8R8<BR8>" 

186 A2 = " >E8R8<EF»GR8BR8>CR8ER8<B2" 

19B A3="A4>CR8<G4BR8F+4BR8GF*F4" 

206 A4 = "BA + B>C*DC-tDEF + R8C*F+: BR8B" 

216 A5="Q3 BBBBBBBB>CCCCCCCC< 0.8" 

226 A6="BR8B>C*D*<B>F+4ER8EF+GEB4<" 

236 ' 

246 B1-"<BF-KBBBBBBBB>4BGCBBBBBBBB>4B<<:6 

B5>B>B<GG + GGtGG-tGG + GG*GG*GG+GG + D2" 

25B B2=" >CCCCC>8R8R4R2<F< <FF) >F >F<CC+CCt 

CC+CC+CC: + CC*CC*CC + }2< " 

26B B3 = "<A<A>EF*>4XCCCCCCCC>4<<G<G>EG}4 

<BBBBBBBB)4<FKFt >D + F 04 <BBBBBBB6)4G A< EF 

EFEFEFJ4" 

276 Bt="R8T195"*A4t"T18B" 

28B 65 = "ER8GR8<:BBBBBBBBBBBBBBBB:>2AR6>CR8 

<EEEEEEEECEEEEEEE>2<" 

296 66="F-»B:B4B>B<B4B>B<B48>8<B4>" 

3B6 ' 

316 C1=-EBEBEBEBE >C<E>C<EBEB" 

326 C2="<A>F + <A>F+<B>G<B>G<B>A<B>AGAG4" 

336 C3="Ft >D<F+>D<F+>D<F*>DER8ER8DR8<B" 

346 C4="V1407 ER8GR862AR8 >CR8E2< V10Q5" 

356 C5*"D*B<B>BFi-B<6>BEB<6>BEB<B>B" 

366 ' 

376 D1="R2R2R2G2" 

386 02="R2R2R2C2" 

39B D3«"C2G2C2GAC4" 

46B D4="GCGCGCGCG4G4C4C4" 

416 D5="C4C4G2C4C462" 

426 ' 

4 36 21="R4.H16H16C4 . HI 6H 1 6C8M ! 8M ! 8M ! 8B16 

B16B16B16B16B16B16B16" 

446 Z="BHi 16H16S16S166H!8S16M32M32":22=2 

♦2*2«2 

456 Z3=ZtZtZ+"BH!8C!8C!8C!8" 

46» Z4=2+Z+Z*"BH!BS16S16S16S16S16S16" 

476 25="H8C8H8C8H8C8H8C8":Z5=25*Z5 

486 ' 

49B PLAY #2.A0.B8 .CB ,D6. 20 

5B6 PLAY #2.A1 .Bl .A1 .D1.21 

516 PLAY #2.A2.B .C1.D .22 

526 PLAY #2.A3.B . C2 . D .23 

536 PLAY #2.A2.B .CI .D .22 

546 PLAY *2.A4.A . C3 . D . Z4 

556 PLAY *2.A2.B2.C1 .D2.22 

56B PLAY «2.A3.B3.C2.D3.23 

57B PLAY *2.A2.B2.C1 .D2.Z2 

566 PLAY ♦2.A4.B4.C3.D4.24 

596 PLAY #2.A5.B5.C4.D4.Z5 

606 PLAY 62.A6.B6.C5.D . Z2 

616 PLAY 62.A5.B5.C4.D4.Z5 

626 GOTO 506 

636 ' " ;»')#t 1i/l?-*°1l " 



BSSsi&Sffi 



W5l7 






rtTHE WALKS^GDZCDfESStf^l' 
Z>A$>%l\)\Xtz 

IB CLEAR2B08:CALLHUSIC< B.B.2t2.2.2.1):CA 

L L VOICE (32 1 .35.321 .35.314.324.312.333.33 
3 1 :CALLTRANSP0SEl-2B I : DEFSTRA-F , T : SOUND7 
•28:SOUN 06.13 



Notes' notes J- y >J-"j 



■■■THE WALKS 

6*A,7J';'i@-r«S«^©l AZ?ti\ 
g*ffl««BH I S(tX). fttcUA 



28 CA="L16V 
C6="<FA>CF< 
CA*C6:C1 = CA 
36 D="L8V10 
:E="L8V10O3 
1"*E+E 
4B F="S6M50 
R1R2L802V4C 
5B AB="L8V1 
16GFG4 . FGG1 
66 68="18V1 
E16DCD4.CDD 
76 T="J178" 
88 PLAY#2." 
98 PLAY#2." 
1BB PLAY#2. 
1 16 GOT018B 



1 205GB >DG<GB>DG<GB>DG<GB>OG": 
FA>CF<FA>CF<FA>CF" :C0="R1R1"* 

CBtCA+CB 
03G>G<G>G<F>F<F>F" : D0=B*D+D»D 
R16G>G<G>G<F>F<F>F16":E0 = "R1R 

Bccn2BBBCM5eecccn4eaBC4" : f8 = - 

V8CV12CV15C + F + F :F1=F*F»F*F 
306DR8< BGE >D< BGBR8GDB4 . AGG1 6A 
6A16>DEF2" 

305AR8FD<B>AFDFR8D< A ^F4.EDD16 
16E16AB>C2" 

:PLAY#2.T.T.T-T-T.T.T.T 
"■" .C6.D6.EB."" ,"".F6 
"."" .CI .DB.E1 ■"" ."".Fl 
A0.B0.C1 .D6.E1 .A8.BB.F1 



y=?XJ-'rt7.C)YMOMK- 



SOLID STATE SURVIVOR 



#H» JL2TBB(20*) 



U-&5&©T\ d©ffifc"lTx*'r^^lci,mt* 

yn?^k*mmtz>tctt\z{;zi\£?<, =t 

r T7JriV,ft#CD=l >tz y h B v y^7,^ y o 
XA t YMO©^A'-SL/fc6 J <tLi5Z:<tfc 

3(S3c^mt"Dt>misnzi^ p-^Y 
<m®Mzmmt&?)\;-ytzr>tz&fco 



1 'SOLID STATE SURVIVOR PLASTICO 

2 "by JL2TBB for MSX-MUSIC on HB-F1XD 
166 CALLMUSICH .8.2. 1 . 1 . 1 ,1 > 

118 CALLPITCHC442) : P0KE&HFA2C . 10 

126 CLEAR3080:DEFSTRA-T:DEFINTU-Z 

136 •=====>MEL0DY 

146 EG="353Y0.35Y2.8Y3,2OV1 103" 

156 AIB)=EG<"T18BL8ER8G+EA4SE<B>D&D+E S " 

166 AM >="86V13G»4G+4G+G*G+4G+F+BG*2" 

176 A(2)="G+F»BG*2": A(3)=A(1):A(4)=A(2) 

186 A(5)="3B>R4.EE4<BB4G+4>C*4.<B4" 

196 A(6)=" >R4.EE4<BB4G*4G*4.E4" 

2B6 A(7)=">C*4.D*16C*16<B1 ." 

216 A(8)="R2B-4B-B4A*4G+4F+4.G4a4G2" 

226 -= = = = oSH-1 BASS 

236 B(6)="T18BV13L80Q5323EEB&EDDAS,DEEBD4 

DF»SA" 

246 B!1)="EEBE4EBE4EBE4G*AA+" 

256 B(2)="<BB>0+F+4F*G+Ft<BBB>F*4F+C+D" 

266 B(3>="C+EG*C*4D + EC*4C*G-tCt>C»<BAG + " 

276 B(4>="< AA>AS<A4>AGECCCCC4&D4" 

28B B(5)="33303Ctl . D2" : Bi 6 > ="C» l&Ctl " 

296 B(7)="<B1 .B6>C+6D*6<" 

306 B(8)="Ft1SFtl3230C+>c-KC* >C+<C*4D4" 

316 '=====>juPITER-4 CHORD 

32B S="34V9EGtBAG»EDD*EGtBAG*EDD*" 

336 C(8)="T188L806QJ"+S 

346 A( IB )="L16O70"+S*S 

IP="T1B0V10324L8O6R1 ,R8" 
366 DIB) =JPt"£DE<" : E ( I - JP*"< BAB" 
378 C( 1 )="V7QB9E1&E1" :0( 1 I ="V7Q39B1&B1 " : 
E(1 )="V7Q39G+l&G-tl" 

386 CI2)="F»1SF+2R8V12324BAB39" :D(2)=DI1 
) :D(3)=D(1 ) :E(2)="D+UD«2R8324F + EFt39- 
396 C(3)=C! 1 ) :E(3>=-C»1G-H" 
4B6 C(4)="E1324V1203EEEEOE4F*4" 
418 D(4 i ="A1324V12Q3GGGG0G4A4" 



426 E (4) ="C«la24V12D3CCCC0C4D4" 

438 C(5)="VQ32E1 .Ft2" : D( 5 ) ="V0a2C*1 . D2" : 

E(5)="V032G+1 ,A2" :C<6)»C(1 ) 

448 Dl6)="C+1C*1";E(6)="GtlG*l" 

456C(7)="F»1SFt1":D<7l="E1D+1":EI7)="Bl 

&B1":E(8)="B-1&B-1 Wl 2324E4E4E2" 

468 C ( 8 I =C ( 7 ) ♦" VI 2324B4B4B2" :D(8I=D(6)+" 

V12324G4G4G2" 

476 '===== JRHYTHM 

486 RA="T186Y24. 1 9B3A1 5V4HB !8H8HS ! 8H8HB! 

8H8HS!8HS!8" :RI 0)=RA*RA 

496 R11 )=RA*"HB(8HS!8BHS!8Y24.22BHH! 16Y2 

4 , 1BBM! 16BS132S32S16S! 16S16BS18MS !8" 

566 R(2)=RIB) *"HB!8Vl5S8BS8rl16M16BS16S16 

Y24,255rH6r116Y24. 1 00M16M16Y24 , 50nl6M16" 

516 •===== >PLAY SEOUENCE 

526 U=B:PLAY#2."" ."","".""."". RID 

538 X=8:FOR2=1T04: Y=2*4 : GOSUB68B : NEXT 

546 W=U»1 :0NUG0T0 56B , 538 . 550 . 530 . 556 . 56 

8 

556 FORX=ST08: Y=X*5-I X=8)«2-1 :GOSUB660:N 

EXT 

568 F0RX=1T04: Y=X*4 :GOSUB60B :NEXT 

578 GOT0548 

588 X = B:FOR2 = 1T04:PLAY#2.AI (Z-1)*2*9) .B( 

X).C(X) .O(X) .E(X> iRlZ**) :NEXT 

596 GOTO 52B 

688 PLAY#2.AlX).B(X).C(X).D(X).EIXl.RIY' 

:RETURN 



i/yy)vzwmti<D&&g 



AHV> 



SON SOFT 



^£-'87 




zcDftF D & : g&K>mm(Dj'iz>yxm 
rt^rnr, ffl[}z¥-ti-frbmnz : &z 
mmmz^fy^i^tmutiu^o uxa 
<t^.-7.^mmizwnx.s a-Kt^nf-f 
*~yyyi\/Z'mmti(D£>z>mzi,tz(Dffmy) 

7JL/7VkDx©^fflct^j©x •> tz >7.7j' ; |gs 



16 


CALLMUSICI 1.0.1.1.1.1.1) 




26 


C:ALLTRAN5POSE(0I :CLEAR 5008 




30 


UMAX.! 15) 




40 


FOR I=8T015 




50 


READ A$:A*(1 )=VAL ("8.h"tAt i 






MEXT I 




7B 


CALLVOICE COPY (A*. 863 




86 


DATA 00BH. 008B. 0006. 0006 




98 


DATA 0000.B8B6.0000.0006 




16f 


DATA 0812.201)0.0880.0000 




1 Tf. 


DATA 023C26A4. 0000, 0000 






CALLVOICE I86J.863i833. 863 • 


863) 




SOUND? .4C, : S0UND6.5 






T=148:DEFSTR A-F .R 




150 


A0="T=T:L16V15" 




168 


BB="T=T;L16V12" 




17B 


C8="T=T:L16V1 104" 




186 


O0="T=T:L16" 




190 


EB="T=T:V103A15" 






F0="T=T:V10S1M3000L16" 




210 


R="R16." 




220 


A1 ="03AD-EA>D-<EA>E-L24EA<A>D-DEAD-E 


-EA 


>D-L16EC<GEGR16F+R16R8G32A- 


.&A-8&A-32 



cto6if.A/tfgasaUfc3WC>r: 

©l oriyt„ aVuBrosi/j:^,, V 

VA©SY55iUo*-«-S'S« 



vmmm 

Glv1t«fflB-ltf»e«l6iafflBS 1 
*4o MIDI fc^WSU, US 
335/'C>Kt.^or7K-7:ib^}B^L, 
Zl^ioZ, t)fcUI3«BfS-«ffl 



to affl^afB«6s<*^t«o7-u 

S/vtitt&S&o 3a. «ffllg*=fco 
OOO, 3«Jg©CDffQCU-&tf-U 



II 

£ 

i'i 

i 
S 

tffi 



m 

9 



72 




490 
588 



53U 
548 
558 



238 A2="B32>C.<AR16R8E£AR16BR16>CR160R16 

E2&E4&E32" 

248 A3 = "04C.4<B8AR16GR16A8SA2&A4&A8" 

258 A4 = "B32>C.-. AR16R8EEAR16BR16>CR16DR16 

E2SE4R8E32" 

268 A5="G4F4E8DR16C16R16E18E32" 

278 A6="R<A4B4>C4U2C4D88D32" 

288 A7="E4 8E8£E16R16E8DR16R8C1SC32" 

298 A8="F4E408C8R8<B88B28B48BR16B32" 

388 AO=">E404Ce<B8R8A1SA32" 

318 AA="RA4B4>C4D2E4F8SF32" 

328 AR="G4F4E8DR16R8C88C2.<B8SB32" 

338 AC="AB>C88C2.<AB>C2.SC32" 

348 AD="R<A4B4>C4D2E4F88F32" 

358 AE="E1<B4A-4E4>" 

368 AF="0-CD-88D-8<EEAR16BR16>D-R16DR16E 

28E48E8<A32" 

378 AG = " >F*FF*8&F*8<AA>DRl6£R16FtR16A-R1 

6A: . .&A32" 

388 AH=AF:AI=AG 

398 A.I = "03L16AD-EA>D-<EA>E-L24EA<A>0-DEA 

D-E-E>" 

488 AK="L16RE4FR16G88G8A18A32" 

418 AL="C<AECGRl6F*R16R8G32A-.8A-88A-32" 

428 B1="03R16AD-EA>D-<EA>L24E-EA<A>D-DEA 

t>-E-E<A>32>L16C<AECER16DR16R8E-32E8E32SE 

4" 

4 38 B2="A-32A.ER16R2R4GR16AR16BR16>CR16E 
-32V6E8SE168E32SE8RSV1P" 
448 B3="RlR2R8<EEG8A-8" 

458 B4="A-32A.ER16R2R4GR16EP16GR16>CR16E 
-32V8E8&E16SE32&E16R8R16" 
468 B5="R2E8DR16CR16<B8&B2.EDC<B" 
478 B6="A4>F4G4A464G2G8F8V12" 
488 B7 = "G8E8F-t32G.B8G8GR16R8ASAlL16" 
"R1R203B>CD<B>G8<B8" 

B9="R1R2>A-32A32<EA>CL24E0C<BAGV18" 
518 BA="F4>F4G4A4A-4F8G8A8F8>C8<A8L16" 
52a BB = " >EC<GE>08<G8>C<EGR16R8E8&E2 .04" 

BC="R2FGA8&A4RR8FGA80EFB<B>C" 

B0="D2.A4F4G4A8F8>04" 

BE="V13D8<A<V10EV13>88E<V10EV13>A8E' 
V10EV13>D8<8V1BEV14>B8E< V1BEV14>A-8E<V10 
EV14>E8<BV14EBA-ABV1 1" 

568 BF-"04AA-A8SA8E-D-D-R16DR16EABR16>D- 
CD-8&D-8<0-D-ER16AR16>DR16ER16L 1 6" 
57a BG="D0-D8SD8<F* >D< Ft-R16AR1 6 >D< A >ER16 
F4<A-32A.GRI6R8F8SF8<G>G" 

588 BH="04AA-A8SA8DD-D-R16DR16ER16AB>0-< 
EA8&A8D-<A>D<A>E<A>AD->[>-<E" 
598 BI="05"tBG 

608 BJ = "03V6L16R16AD-EA>D-<:EA>L24E-EA<A> 
0-0EAD-E-E{A>32<L16V14" 

618 BK="AAA8V1 1 > >C8< < G >ODR16EC< CG >0-&D- 
1" :BL="C<AECER160R16R8E-32E.&E4" 
628 C1="03A8.AD-EA>D-< EA >0-E[)-8< ASA >A< A> 
EC<CDR16R8E8>E-E<E-E" 

638 C2="03A8EBA8EAAAEEA8AB>C8<G8>C8<G>CC 
C<GG>C8C8":C4=C2 

640 C3="<G3D8G8DGGGDDG8D8A8E8A8EAAAEEG8A 
-8" 

658 C5="<G8D8G80GGGDDG8D8E8<B8>E8<B>EEE< 
BB>EDC:8" 

668 C6=">L80.3FFFFFFFFFFFFFFFFV12Q2" 
670 C7="EEEEEEEEAAAAAAL I6A>A<G>G" 
680 C8="<F8FFR8FR16R16>C<FF>FCF>C<<G8GGR 
8>DR16<GABG>D8F<F" 

690 C9="E8EER8BR16R16>E<EE>E<B>EB<A8AAR8 
•ER16R16A<AAL24>AGEDC<BL 16" 
788 CA = "F8CCF8CCF8CCA8CCF8COA-<FCOC<FC 
CA-GFD" 

718 CB="C8CCC8CCC<GBR16R8A8&A8AAA8AAA8EE 
G8>G8" 

720 CC="F8C8FCF&FFCCFCE8D8<A8>08<A>0&D<A 
A>D<A>C" 

730 C="B8F8B8FB&BBFFB8F8" :CD=" "♦C*C 
748 CE = ">>E<E8EE<E8E>^E<E8EE<E8E ■ >E'E8EE 
'.E8E^E<E>E<E>E<EF<A-- 

758 CF="02A8AA>A8 . < AA8AA >A8 . < AG8GG >G8 . < G 
G8GGSG8.G" 

7o8 CG = "F*8F<-F<->F»8.;F + F»8FtF+>F-t8.<F*F8 
FF>F8.<FF8FFF'/FG<G" 
778 CH=CF:CI=CG 
780 CJ="03V9A2A8E8>D-S<A8Q4" 
790 CK="V1404AAA8V1 1 C8C< GB-R 1 6 >OC< < GC< A 
3&A8E8A8EA8AEEAAE8" 

800 CL = " >AM< A>EC<CDR16R8E6->E-E< EE" 
8I0 '0Bn o -Mi JiifflUU*? 



820 02="04R8R16V9832>C.<AV7B32>C.<AR4R8R 

I6R2R4V15>R8E16E16" :D4-f>2 

838 D3="V6R1604C4<B8AR16GR16A8&A2&A4&A8R 

1 6" :D5="V6R16G4F4ESt!R16C16Rl6E1&E16" 

840 D8="V7R16F4E408C8R8<B8SB28B4&BR16B16 

" :09=">R16E4D4C8<B8R8A1&Ale" 

850 0C="V4R16AB>C8&C2." 

860 0E="05R16V608<A<V3EV6>B8E<V3EV6>A8E< 

V3EV6>D8<BV3EV7>B8E<V3EV7>A-BE<V3EV7>E8< 

BV4EBA-AV1 1" 

870 0K="05V7L16R16RE4FR16G8&G8A1&A16" 

888 0L="V3Rl6C<AECGRl6F+R16R8G32A-32«A-4 

890 E="C16C16C16Cl6C16C16Cl6C16":El="aAl 
4V8Y23.0Y22.0Y24.5 0"*EtE+"SM! 16S16SM! 165 
16S16R16S16R16R8M1S8S8! 16SB ! 1 6B ! 16B ! 1 6" 
98 E = ~B16Rl6816B16M!SB!4":E2 = "V14"*E + E-> 
E*E:E3=E*E*E+"B16BI6R16B16Y24.IB0M!S!16M 
!S ! 16Y24.80M1S! 16M1S! 16Y24.60" :E4=E2 
910 E5=E+E+E*"MS16MS16R8MS16MS16MS16MS16 

628 E6=E*E*E*E 

?3» E7=E*E+E*"BI6RI6B16816Y24. 1B0S1MM6Y 

24.4BS1M! 16Y24.10BS1M! 16Y24.40S1M! 16Y24. 

68" 

940 E8=E«-E*E*E 

950 E9=E+E*E»"B16R16B16B16MS16MS16MS16" 

968 EA=E+E«E+E:EB=EtE*E+"Bl6B16R16816Y24 

. t08MSl6MS16Y24.80MS16riS16Y24.60" 

970 EC=EtE*E*E:ED=EC 

988 EE*E»E*"MS8MS8MS8MS16MS16Y24. 120M1S! 

16M! 16M!S!16M!16Y24.80M!S!16M1 16MISM6M! 

16Y24.68" 

998 EF=E6:EG=E7:EH=E6 

1888 EI=E+E*"aA12R8Y24. 168SMM6SM! 16R8Y2 

4. 120SM!16SM116R8Y24.80SM!16SM!16R8Y24.6 

0M16M16" 

1010 EJ="S!4R4Y24. 120MS8MS16SM16SM16SM16 

SM16SM16" 

1020 EK="SA15B!16B!16B!8M!SB!4"tE*E*"8!l 

6R16B! 16B!16B!8B!8V8" 

1030 EL="B! 16B!16B!16B!16SM8SM8B!16B! 168 

! 16B! 16Y24. I60MS 16MS 16Y24 . 100MS16MS16" 

1848 F1="M200CCCCCCCCCCCCCCCCM2200CM288C 

M18BaCM200CM24 00CRl6CRl6R8M2200C3M800CMl 

aa0CM2400CC" 

1050 F="M268CR16CCM218BC8M260CC" :F2=F*F* 

F»F:F3 = F*FtF*-"M120CCR16CM999CCM22B0CC":F 

4 = F2 

1868 F5=F»F»F*"M21 08CCR8M1 999CCCC" 

1878 F="M26BCR16CCM4380C8M260CC" :F6=F*F* 

F*F:F7=F»F*F»"M4300C8CCM1000CCCC" 

1B80 F="M26 8CR16CCM25B0C8M260CC":F8=F»F+ 

F + F:F9 = FtFt-Ft"M260CR16CCM370 0CM3100CM37B 

0CM3100C" 

1890 F="M260CR16CCM4300C8M260CC":FA=F»Ft 

F*F:FB = F4-F*F*"M320 0C8C8M380CM22BCCC" 

1 180 F="M260CR16CCM2500C8M260CC" :FC=F*F* 

F+F:FD=F*F+F*F 

1110 FE=F+Ft"M3280C8C8C8M4aaCCCCM23B0CCC 

C" 

1 12B F="M260CR16CCM2S80C8M26BCC" :FF=F*F* 

F*F:FG=FtF*F+-M260CR16CCM3700CM3100CM378 

BCM318BC" :FH=F*F*F*F 

1138 FI = F*Ft-"R8M128ecCR8CCR8CCM8B0CC" 

1140 FJ="M100 0BC4M88 0CCCCM160BC8M80BM170 

8CCCCCC" 

1158 FK="M8BBCCC8M2508C8M260CC"»F+F."M14 

aCR16CCM7BBC8C8" 

1 160 FL="M788CCCCMl7aaC8C8M580C16C16C16C 

16M2000CCCC" 

1 178 PLAY#2.A0,80,C8 .D0."T=T: L16V9".E0.F 



1 188 PLAY#2.A1 .81 .C1 .01 .R*A1 .E1 .Fl 

1 190 PLAY#2.A0,B0.C0.O0."V9" .EB.FB 

1200 PLAY#2.A2,82.C2.D2.R+A2.E2.F2 

1210 PLAY#2.A3,B3.C3.03.R+A3.E3.F3 

1 220 PLAY*2 . A4 . B4 . C4 . 04 , R *A4 . E4 , F4 

1 238 PLAY#2 ■ A5 . B5 . CS . 05 . R*A5 . E5 . F5 

1240 PLAY#2.A6.B6.C6.D6.R+A6.E6.F6 

1 250 PLAY#2 . A7 . B7 . C7 . D7 . R+A7 . E7 . F7 

1260 PLAY#2.A8.B8.C8.D8.R+A8.E8.FB 

1270 PLAY#2.A9.B9,C9.D9.R*A9,E9.F9 

1280 PLAY#2.AA.BA.CA.DA.R*AA.EA.FA 

1290 PLAY#2.AB.BB.CB.DB.R+AB. EB.FB 

'30 PLAY#2.AC.BC.CC.DC.R+AC.EC.FC 

1118 PLAY*2.AR.BD.CD. 0D. R+AD. ED , FO 

1321 PLAY*2.AE.BE.CE.DE.R+AE.EE,FE 



1338 PLAY#2,AF,BF.CF,DF.R»AF.EF,FF 

1 340 PLAY#2 . AG . BG . CG . OG . R*AG . EG . FG 

1350 PLAY#2.AH.BH.CH.0H.R+AH.EH.FH 

1368 PLAY#2.AI,BI,CI.DI,R*AI.E1.FI 

1378 PLAY#2.AJ.BJ.CJ.0J .R»AJ.EJ.FJ 

1380 PLAY#2.AK,BK.CK.DK.R+AK.El -Ft 

1390 PLAY*2.AL.BL,CL.DL,R+AL.EL.Fl 

1408 GOTO 1198 



9Rmmmm<f:om< 







mz. siun+txi'C7)^Px'rr-Ui»< 



MUSIC 10.0.1.1.1.1.1.1.1,1,1) 
03L2G.D.G.D.G.D.G.D.G.D.G.D." 
05L2RF-fRFtRFtRF*RF + RF+RF+RFtRFtR 

05L2RDRC»RDRC*RORCtRDRCtRDRCtRDR 

04L2RBRARBRARBRARBRARBRARBRA" 

06L4R2.R2.R2.R2. R4F.AGF*C:-KB>C+0 

8F*2.&F+2.&Ft2." 

G .D.G.D.Ft .<B. >E ,E. D." 

RF*RF»RF»RF+RFtRFtR2.RGRD" 

RORC*RDRC+RC«RDR<BR>OR<A>" 

"RBRARBRARARBRGRBRF" 

">RFtAGFtC*<B>C*D<A2. >C*2.F+2.<E 

2. " 

"<A. >D.D.D.B.D.D.D.D.D." 

"RERERERORDRFRERERDRD" 

"RCR< BRBRARAR >CRCR< BRARA" 

"RARGRGRERF*RARARGRERF*" 

"AB>CED<B>0C<B>O2.&D2DEFGACDED<B 

"03L4R2 . R2 . RDRCRCR2 . R2 . RDRCRC" 
"E.F*.<B. >E.E.E.A.D." 
"RGRF+RFtRARARD4G4A.A." 
" >RERC+RDRERF + R<A4>D4E. Ft ." 
"RBRARBR>C+RC*R<<<<B4>B4>C.D." 
228 E4S="G2.F*2.<BAB>C+DEC+DE<F*2. >C2.D2 

238 F4$>"R2 . R2 . R2 . R2 . RARREG2 . 02 . " 

240 G4$= " L20 1 R2 . R2 . R2 . R2 . R2 . R2 . R2 . A . " 

258 A5$="E.E.E.E.E.E.A.D." 

268 B5$="RGRARFRARAR04G4A.A." 

270 C5$=">RERFRCRERFR<A4>04E.F." 

288 D5$="RBR>0R<AR>CRCR<<B4>B4>C.D." 

29B E5$="G2.F2.<B>CFEDCEDC<F2. >C2.D2." 

300 F5l-"R2.RAR2.R2.RARREG2.D2." 

318 G5$="R2.R2.R2.R2.R2.R2.R2.A." 

328 T=76:PLAY #2. "T=T : 31 2V6" , "T=T;31 6V1 5 

"•"T=T;al6V11"."T=T;316V11",-T=T;B16V11" 

."T=T;a42V15"."T=T;a3V12","T=T;ai6Vl1",- 

T=T;ai6V11" 

338 PLAY#2.A1S.A1$.BlS.C1$.Dli.E1S.E1$ 

348 PLAY#2.A2$.A2i.B2I.C2$.D2$.E2I.E2$ 

350 PL AY#2 ■ A3$ . A3$ . B3$ . C3$ . D3$ . E3$ . E3$ . F 

3S 

360 PLAY#2 . A4$ . A43. . B4$ , C4$ ■ D4$ . E41 . E4i . F 

4S.G4I 

378 PLAY#2.A1S,A1S.B1S.C1$.01I.EU.E1I 

388 PLAY#2.A2$.A2$.B2$.C2$.D2$.E2$.E2$ 

3=0 PLAY#2.A3i.A3S.83$.C3$.03$.E3$.E3$.F 

33, 

408 PLAY#2,A5i.A5S.B5S.C5$.D5$.E5$,E5$.F 

5S.G53, 



10 


CALL 


20 


A1$=" 


30 


B1$ = " 


F-fRF + RFt 


40 


C1$=" 


C»" 




50 


Pl$ = " 


60 


E1$ = " 


<A2 


.F + 2. 


70 


A2J. = " 


80 


B2$ = " 


90 


C2$ = " 


100 


D2$ = 


110 


E2$ = 


2.&E2.8E 


120 


A3$ = 


138 


B3$ = 


148 


C3J= 


158 


D3$= 


160 


E3$ = 


>D2 


,SD2[) 


178 


F3$ = 


180 


A4J= 


198 


B4$= 


200 


C4$ = 


218 


04$ = 






tame, mmp i t i nn-cssi 
mz i @5-f 7«^o7jo§ r #«H 

r-To btcbummi-ozsm^zm 
oresfo iti^ote, esc 



US5Ui5 K^tUSf, 
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<-\> &&%y-n>i i e*>x.ft 



«0ii>Sa)?cfiD©D-^-SSfflUd;5 



AV=l>iH=(li(TAVffl)^ 






1 ■Di£ r ¥¥1—Zz\-j— J 
to I oBMSX^-^A© 
r tf44— X-Jb-A [*«^]j 

£ 



3 3&e>£&l/rfcK!"3*frU 

<&u©r, nva£isi;«>fc 



aB»Bngo»OT:,-K-H=KHigcfara»^5 I 



Nl FTY-Serve TOP 








I. *-f^«F*) 


2. 


«? > —.A 




3. »*«8 


1. 


CB'> 5 a U-- 


9- 


5. 7 * - 9 a> 


6. 


^ a - X/7 


* - v / ^ a ^ ts 


7. f»*.7/i(*/l»jl 


s. 


» w / to * 




9. v 3 v M.yf/7 V 3-t- 


10. 


Ifa ii / ^ k > 


K 


II. 8 l S^^'f'7^?-fJl'/y-A 


12. 


7-To/: 


> b - 3 - ? 


13. *?!•?-«"<- * (INFOCUE) 


14. 


CompuServe 




15. t'*t-XD-t- 


E. 


♦ST 




>I5 









Tjorn5!iL;©gB*§^r' 




^tot'Ava^lSU&fce.fr 

£©«*£^A J r=fc65;t<»lc 

-^615S©f^±-Xzi— + 
-^B^d:T©cfc5&I 




<fc„ S^&IC, «lSffl r /Ejtt 

oir An& i> t *£ 3 &*st 





"CLi5©A\ XHCSttrnr 
ZfcVtz<&& -ZfcMZZCD 

mm&MTkutztib-cfo 




±:^yyy-DZl\3ZtU^ 

fcotto 



foWftmBm-frtfz bic*s3 
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CSor,#Sli4g© r tf34- 
— X^a— 5AjCfJ<<!:JW 

ami,©, ifrfc'iiftaia 

ISP=WL^BL«^3^nfcg 

^dm^ffliip^i;: v^tt^* 

M^x5>©Afc5tfSitir]|;: 




35ofc/Wc r7r-<t-7< 
t>UA*U<in3A,&»f<©A 

5©tflU\o 7*— 5A©1^> 

r, tta©ffiK©Afc5^«a 
©iSHrso±A^rusiL^ 

5t)lt/cfto 



fc, 5&£<7>*§-li, 0427-95-3421 TT, ¥*7>#<§-Ui *g*H:*8Sl 41 TT? I. ■ MARIO-NET £>i-:*#'S.3Aafet/IC8&S 







©£fr bC^OTo U tX* 



6, «*3*-Hteo 








■sf^^D^^ass^^D-Fur^c^o 



sr, #JtisMSX3.-+f- 

tffc<£A,u3MSX:7 7r-^ 
BMSX©7 U -0 1 J^^O 



J^A^O^O- KUTc?j^*i 



>n-K-rs^to x— S^Y 






s» «« a»,» an. 



57 ( S7) D6/73 HSXXBIV: 



7!) 08/05 fc<>L*7-< 



3 S3 ( 5?) 07/27 



-,?)-* CP/M7fi?7i3-t 



I ltl Mill OS/HI EttM>M»tMt (*iRB«n 1 

{ 30) aim mm*M si* 



si os/i? e**- x-ji—i. [«w] 



-?5-r7?'.l (1:t-S>- 



'7»-t (ISM) 4:»>0-l E:|»T) 



PE00O0SB 9I/05/I? 23084 27 T KT200K ISHrtttT.r. r2. <orW3»-r'*;.f41 



PED00O56 91/05/1? 22373 



• 2. lor IS232C/ISHR 



PE000056 91/05/12 5740 28 T UKARCZ80, ISHICP/HfflHUAftc. COrOTISHfijTtt 
PEO00056 80/09/29 23011 127 7 CPHMMC. ISH UHAAHRO^&SiSJUFS) 



PEW0056 90/09/2S 19328 133 ! CPK.MPC. COM (WA/lMlOmaBiSftlE) 
PED00O56 90/08/14 5008 245 T LHRD. COK. IHA. COHffMt l J 75 



PEWO056 90/08/12 503S 251 t I SO. CKKOrt 'J 7i 3S2» 



PED00056 90/08/12 4191 209 T ISH. CIWCTt 'J7i K 1 W 



PE0OO0S6 90/08/12 5397 234 I XK0OEIU"; VC1- r 



E€©XMODEM£li? 






/-t*c7Mf-§-4-c7)*\ ynf7i>± 
<7)ft-§-4<7)*\ a^-lT-ji-'oA^-tf* 
fetZZttf*>Z<7)tzo X\ Z<Ji 

fc U t5/i«><7>:7j;fc!r* r XMODEMj 
fcfclffc'a '<-f-x'Jx--7«t3 
(128'<-f h «r 1 ya-y^ttS) 
x- ? 1-$:&T 5 y P if? A/i't 



rtor, 1 g©x— £--is 
^at^nr <•§><, z. z izjk 

VS£l3i;#>7cli>OfflA©fc 
3A/&|;i£-g>©7c 





iaUC r ISH.COM©ftD7i 
P-KUr^d;5o x-^lcli 

fr& 63*5 «fc o £ L- fcUJSiEXtf 
onrU3©t\ S3*tt-?rfflttt 

;±g^©x-^©i|£tt r x+ 
X K j &©T" 3fc¥ <± [l] u d; 5 C 

WMizmaktz>z.£t,7:£z> 

t^or, ci^s©B5BiJii 
cs^-rf,3d:tta-5A\ 

XM0DEM&<!f©7PS3JL/ 
£15to&n£x-^©gl;b)gL 

x— £ic*^i\x+2. s&©r, 

^P hPJUSeS^g^HT© 

B,TH7-r5©7c 



XY9 




It***, 0-779 hi, 

(XStt. *ffl» • 151ft) 
/I\ x-f*- ■fX'tt.nfTQh 

ixbwmm&mizti 



Zk.tS£*£' , )tt'? 



i itM i &2m&L±tz-o t mm 

CMit^izt rtcoTv □ yy 
<y b Lx r o\+jtm^^titz^ 

CCTRLj* - t CSTOP)* - «r 
0+jtA*r*t*t7)*iny 

-ot*z.t# t x-&zt» 



*}flW»-?T*~* 
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7H \-m9l7JQDV-0x?*te>TM£5 



7'J-0i7'r±:IS, ^<©A 

y-AW-JL/fclSUtf), CG 
:7P7'5A£eftIl/;tQ, £ 

fc'AS ^©^iic-E-^rte 

ffl-T ^(fccixISrfe©*^ h'x 



zcD&frcpDsmttmzm 

Tf£J»tgL7Sl.;££Sffi7c£^ 
5*r'B^*0ISSiJ*tlSo -E- 
45-5-45, B*©gfftta©45£ 

IS*>> hl;:S:^T3:5i*5&© 



Sfc, V7h7£i5g5if£, {£ 

7U-0i7a©/:*bo 



#0^^1-5 V 7 K©SSX« 
^©c^&CfcSinLfcl^ 
A7J'+^¥»CV7h«<r!i;i 
^^©UtK-K 3/u&Hi£ 

wlB^E»TtI4-10-7 TIM 
MSX • FANSI«8HAV»^ 



HI* ffl x -f X ? 0fl= D 75 



^H z © z\ —y- zmirtz 

77K?«ffl|-§l:B 1 MS 
X-DOS(if7clB,MSX-D 
OS£)tf&gr35£>o 

sr, msx-dqscdt-t 

7.77j n &, 

MSXDOS. SYSt 
COMMAND. COM 
35SIMS, 

MSXD0S2. SYSt 
COMMANDS. COM 



©77"f;U^#/iU<7^-V^ 
h L/ fc x f 7 7 (Igf -f 7v £ 
r±0¥/3?)Cntf--rs o 

atf-ISDOS©7P>7'h 
(A»^tbr^s«^r, 

A>COPY MSXDOS. SYS B : <*J 
A>COPY COMMAND. COM B:«j 

MS X -DOS £■©*!&« 

A>COPY MSXDOS?. SYS B : *) 
A>COPY COMMAND?. COM B : O 



ZZZ, ftiix -f7.7©thfi 
/co tt®xf7^fr6, 
PMEXT220. COMcT 
PASOTEN. PMA 
©E"Z>©7 y -Y ;U£ z\ ti-t & 

A>COPY PMFXT220.COM B : fi> 
A>COPY PASOTEN. PMA B:© 

K5-<7'7£frii7 2 '<7.^7T'&, 

A>PM£ XT 2 2 5) 



^nfrur. 



A>PME XT PASOT FN *. 



£U "r4 7.0\Z±%Z-\m<T) 



A >D 1 R /W <y 



i s h « ft * 




ish.comdsh : -<z;t.W& 

IS, Kl'7- | Jcrx*3.h£*§§ 

ishrg^tsnfcx-^is. 




1 1 ^ 5 .*mm use? >p ie^§ ( x 

**S)©37!iC£So 

^nSb, i305fflX?fflct 

* < & n 7 U - -7 1 7fflg;)t U 
CIS, i©ishicd;orffi^L/ 

1 7 y -y jus *sn f y&©7c 
is.£ftX-z>Z)V}\zt£&zt.if 



ct < $5o ishicis, x— ^©a 
zcDishz&mtsnfcfttsftz 

1\£>7"J-'5i7 7 IS#IV, 

ish.com 

MAKE I SH. BAS 

£ l\5 7 7-f Jl/£/3o5©B 
AS I C77-YJUtllL;S;5C 
RUN*-t+5„ 



A>B AS t C O 

RUN" MAKE I SH. BAS'O 




tn^iiratf^TStfinfc© 
^ r ok j iMTr^tvrm^T.ciz 

I SH. COM 

7J i r'S±^orSri:n5fei77S 
©r-s^o 



Mex tdPMa r c 2£fE3 



PMext, PMarc 
by Yoshihcko Mino 



PMarc2©d;-5&ff8t©:7 
£EifOTggc=45lA-5)3-3y- 

lUDzt^ 7-/]Yy;<iU5„ 

Sfc, PMextIS, ES§£ttfc 7 
y -Y Jb^STc-r § (JSisBi: 45 \,\ 
z>)V-Mz 
7 l J-^i7IS^^h^b^7' 

7>p-Kur¥icAnst<», 

AtJ&T'P 7'5> AIS-ETI/cItS 

rL/^5o -E^r, /J\i<3:ci: 
feST'-^'TKISAViiriS^ 



PMvU-XIS, Btf'^hA 
VP>©OS, CP/Mffl^- 

MSX-D0S±?B1)< 

PMextIS, LHa, LHarc 
&d:(D7-t)-l JKZI±MLtzL 
Z H t. U5ffl7lxffl7 7 -Y list, 

mnz-i&oitzo 
mzuz)\zz(Dmmttm%?z- 

iZ'p-DZi^CDtzo T'tS, =&5 

7s^czitf-utB*cM-3r 

M5„ fllT-fX^frb, H 



A>PMEXT2?0 1> 



-1ARC200 * - * O 





PHsfx 
Copyr 


Ve 


'SIO 

K 


2,00 tot CP/H 
1990 by yoshihiko 


Hi no. 


PMEXT 
PMFXT 




not 

COM 


Extract. n 
Extractin 


S OK 
5 OH 





trU^BtlSSro^t, PME 
XTE. DOCdrPMEXT. 
COMtU57 7-f Jbtfr'Sfco 
'©PMEXT. COMA^S 
1-5fc»ffl^P7'5Af±U-5ti 
Ij&ffl/c'o cSCEUfflfflT'P 

^'5A^«;«L/cfc5o 



PMext Versior 


2.20 tor i(K CP/MI280) 


Copyr. qnt (0 


1990 by Yosnihiko ,1ino 


Archive tile 


= PMARC200. FHA 


PMARC2 HOC 


Extracting 1)085/0065 


'IK 




PHARK2 COM 
OK 

End of ircA'l 


E.lractm, 0051/0051 



PMARCP. DOC 
PMARCP. COM 

©eo©7 7--Y jutftbr < So 

r ~. COMj/)^^r', r ~ DO 

Cj is^nfflirasx-rSSo 
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PMCHGMX©® U 7* 



PMext.comttCP Mffl 

cfr^nri^ror, msx- 



rii, PTPMA. PMA£ 

A>PMEX T PT PUt *. * O 



PMCHGMX. MAC 
PMCHGMX. COM 
PMCHGMX. DOC 

©3^tfttir<3„ -g-ur, 

»>PUCHCMI«I 




BPUNCH. \SH?MM-1±1fo*mmTZ> 



ctU53t?, IMdiJO^-A 
^BPUNCH. I SHiU-5 

ishJfJit©x*7,K7 7-<Jb/co 

ts-s/u^ro^rii'r-A 

^P^^AtLreBTS^LAo 
S^ ishfl5j£©^*3.h:7 

I SH. DOC 
DOS©TYPE=l7VK&£ 

I SH [77-f JUS] 

©ncA^-rso 3©^^is 

A> I SH BPUNCH. iSM'J 

r-7 7"f ^©igTLA'^tein, 




BPUNCH. LZH 

<_ C_ /liA "2 O 



Hal ££<*£*» r ~. 
COMj cr-ifst^ r ~. DOCj J: 

r ~. DOOifci^^T-OKift 

r ISH. COMj Clifeot, L> 

r ISH. DOCj kWiftUi.t'n*' 

oTBiffrtV-'T t, t1Zfr< 
jH^BASICA'fcl+fltf'CiS &L' 
A*\ 

A>BAS I C O 

CALL KAN J I O 
CALL SISIEM'J 
A>T¥PE I SH. 00C « 



r ~. LZHjtL\5SS5S?© 
77-OUB, LHarc^LHat 

Sdt^»D*urnf.©r, ^ 
m&znzmmt&o 

zmzte, PMext.COM£ 
ffie>cPMext.COMBPMarc. 
COM£f£orfF"5 r ~. PM 

m%L?Z>tet>\ LHa^LHarc 

Lift*, PMEXTE. DO 
PMEXT [J±*77^JbS] 

mmyy-i)^] 

A>PMEXT BPUNCH *. *(J 



£&Z 


>©"C 


ZXY^l 


mmmt 


PMem 
Cepyn 

Ii.e s 


Version 
ShtlCI 
tawp su 


2:20 lor 3 
390 by fr/s 
aported tor 


IK CP/MIZ8U) 
iihiko Mino 
NSH-0OSI2) 


Arcniv 


e f ile 


= BPUNCH 


lZH « * 


BPUNCH 

ok 

BPUNCH 


BAS 

Bid 


[atractlng 
'■tract eng 


0010/0010 
0013/0013 


BP'INCH 
IK 


HOC 


Extracting 


0007/0007 



BPUNCH. BAS 
BPUNCH. B I N 
BPUNCH. DOC 
©3^©^ 7 -f JL/ftMUBftS 

znTmrnmimiUzc 

A > B A S I c rj 

run isbas i cwmztj.& 

©?, &£\£7 7y9A£:mV 

efc5(C, 

RUN" BPUNCH. BAS'O 

#JSi*ffiic,Eiiurjsh7 

*3\PMARCE. COM£ 

Hi^ffl^xic, 
BPUNCH. I SH£ 
BPUNCH. LZH 
%M£l;Zt5Z\5o 

A>DEL BPUNCH. I SHI9 
A>DEL BPUNCH. L Z H t> 

BPUNCH. BAS 
BPUNCH. B I N 
BPUNCH. DOC 
©30©:77-fJI/6 



BALLOON P\JNCHO)mVf5 



Qz.tT.T-? f A* 5 >7ttE%iz'i ->tz 



BPUNCH. PMA 

3©as©«ittt, 

A>PMARC2 BPUNCH BPUNCH. *0 



tare Version 2 00 foi IS* CP/N1Z80) 
opyrijtitlC) 1990 »y Yoshihlko Nino. 



lit = BPUNCH. PMA (NEW) 



i 6* Adding Done. 



iressin! 0007/0007 



tl^WC. PMA7 7-{)b 

one, i SHizmmtz,, 

A>ISH BPUNCH. PMA /SO 




tL^SStfcSor, PMA7 
7-f^^lSHJBitl^^Ufc, 
BPUNCH.ISHtf^Ee-TSo 



* 



BALLOON PUNCH 
by S ATI CO 



U r DiS^<7)JUSiOU7'^->a >■ 

{am ji^*^5STLT<nsA* 
9iti:«>So tit, ->-v-<7)K 
*HMlcL»fcA*"TRc>'±*' f tJ» -H8-4- 

T> cn«r#J5-tr*"*T'<*5 M§ 

(i rS v. ^±ai5 rrm-s^'ra l \, 

Ali, i'-y-Tatt^-ft-it: 
— /<— C& So4*Ss<fJa < ■> J r>7' 

tz^-yu, r#*«iti'-y-* 

aSt-AiSl+fcAS-t^, 



• 


SCORE : 

9 


8888378 


HIGH: 


8888568 


. 


» a 


a 


9 4 


9 








9 4 





UPl 










H 


#' 
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j^ THEMzzm/wm^^ INFORMATION PAGE 



zrnvj 



§5 



K*-^-XlU7 



i \ttisrA£ u r sfcfi At^ 

ti.<LZ?>fr%:mz_Zte5(Dtzo 

^7XifiEi;Sor5zt„ 
^^^^cd^Av^&Ir] i; <" 6 i\ 



Witgic&s^rfrij-fc'o 

ftfrb&ncitis. §7^7 
©S=!i#(}§ft©5t£^fci\& 
A)lC7K-K^ffio'THP^'rn 

isrnfeL^ci5s.r<ns©/c'o 
^fc, ffl/L^^ffl©^ wh 

nrur, <i©tsis, ^f5 

r-^o<9©A,u>3tsu£n3: 

/ <^^>lql±©5 1 -f ->KIS, 
TZ'UT. If- KTX -v tz- vtf 

5t^*ns©r\ *M\#is&fr 



MSX-FANODiWIH -^^-^ e, 



&r. $R(DX-)i>®fttztt 
£\*I£8^r r 33fel,bl« 
SiI&UfcbIst*r£l:f3c£ 
~j tlUfcb, ?&££ 93K3: 
UfcteXo 3ffl s r MSX-FA 
NroiSilSjIS, gUt 511?$ 

tibrt, $[5]©ij$©«* 

— 9— £UrLV§7K— KOSfg 



BBS©, ;Wzi>|fS^o M 

sxistSb/iA ftsimt^g) 

«ur<nfcbd:fro;t©C 

AbtbMSX • FANa-t 
- r i»n335t!-lo5lyAj. l Sr\ 

lo 



FROM ID 6 

L-"j,"X-tf SL 
^,?cio SL7BA 
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i«7-( y fit* -Olzts&bmzt)-] tatty 

iWWPn'Bifc- 1 US -j Tfc C «> % It £' .. S*>«ft »fc 




fr*>l»l.» 4-SIJSCREEN7OT*— K4-SoTflj 

SfrtK-it. *T £!**>•; !*<.»*. fcl.'TfcU'pS,. 
VQIiS^*(7H-Sr«#-5-?ltfcfcfr(fT, gfl'SE 
ATl'STJiU-pSJ:. IIIKI- «El'^'j:A.*>t. 
£A.£A,WRLXtzbti | 



RiB-SBBflW F.G1 (Aty-^«TAx^x«fi) 





■MtHTOTUUTfcUvSJ:, S0jffi#7Jrt ! 7* 
i>0Xf;tS7?=t ; ^SU88Tlci£* f *BIi:*\ S 

>j:A.fri;7j£AnT}tdr.A,T*T(iu>Tfcu^ 

i. b-jti <^iX-SiL^i,i- ttiirh. Att 



^^R4ii;illfKi)^// H®(«7»ojwffffl) 





£UfrofcAfc5 



r »AOTTT'jlt5Cai • ,S*-JU( I -3-3 

1 ) r RPGjHS»'*7UU//(2 • 2 • 2 • 

2 ■ I ) r Bij**&B-A>iJi»-*>C2 • 2 • 



0V?. Sm«(t73>i^*^SffflLTflMLfcTfcl; 
-Si. ?t>, Z7L>7?'-77i- v?Ufl«aA ! «i;* 

QQint 

• 3 ) r 5MSiail.,iftl» • *«tf§-(2 • I • 2 • I • I VT A K E 
2) r MSX»BfcW^S' , J— XI jASSItt- COOK (2 • 3 • 3 • I 

■ 2 • i V'T'-^tmiJ^A,).®**-^:'!'^! • i ■ i • i 




J5l5l3BI3o// (^'57*7Ji/7*ffl) 




4-3.VO.io, Zll^y-J 
~7 ■( y9ltXBS8K-tsi:fi>_. 

fe-7t, tot, tot, iR 

¥fc££CLTffiUT3TU 
Kn64)S U>T£rt;-p-S- « 



lgD(F17-JbT^77«ffl) 




iff, ^U— flEfciS(;fTA< 

'i*Qf:7D L<L< « 











mu'im^xm-pz, -k 

tXhCoi: *ftCLTfc 

59)S JLf<bi.> j 



MI-ROM 





b -3 C W7)+ Sr»!5i U TZTb 
IILl>TfcU**, IS 

0) J X T g t>T-*- X £*IA 

TAT, AHCOB^OTU??- 

W3CLT/;Mi m 



T*Ml 



OFF/j 

• i ) *m&.$.itffim i A.i^ 



I • I 

• I 
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#5 



<£ -"■*> •* ■• '. 







? v * it *; .. 
©COS fg£Lriic£<355 



«WI-*L^- 




A*f&|§ t^53^wi/xa« 



1 , 2#it/U£OT*K £*>itS So 










0*** K5T^;A*SL'i I'd: left 

a-3(r<3C*3-oTi»<o 






ilOTii 5 *>«drt«WWJtil 5o 




?5:3 



-7-f y— OTJTCU4 ?:#-* 
IJ. :f»Afri,Bk>TL 
*-3fcT-fcU<P4J:„ tx 

J:.SCREEN5(7)5 , '77-rv 
■>^flE-3Tl'40)T. X-C7. 

^!3ftTi.>4ff>t>TcvT-«i; 
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(KATANAtf^T^WttTfb 

mm. -7?ffl r iicDiHbjffl®5 

P~-f/ rj-^^fflAKiK 

CDC03 SJ;^d:^hb-K 



•• 



6 







r-r^cHtscai 



#0. •f^ix-fX?i;«»S2ga5f'^(7) 



9 



SUJU-Okaten WJMSfy^-^^^™^ 





><&«"f*-3TST<ftfcT 

fcOTT", MSX2+T\g.4i;i*nf;<W8j 
U:^(:7P. T-#nif. MSX2Tk|B]«OT 
*£- KT-£>bft4J: -jlzLTIILA-^fc 

i<T- J ^|Ali-'r*Ta'i'U-?-t'>Qp(i . 






W6fctta.fc, 



lEBUJSsfc 



5o 



Ttl-M-oXA- 



<nt <: thr>x, 

(SIS*, to 



si 


/^Jfc\\ 


* 


(fs^y 


fS 


sm^^__^^ y e* 



•tt^gasn («a •«$• mi • mm ■ am) "na 

«***• TAMUSAN(3« 3 • 2- I • I ) r F a n c y Mm- U££Ui-(2 • I • I 
Ui"f>*{2 • 2 • I • 2 • 2) r Th et 7 hv>j*8S)». DRAGON SOFT (2 



2 • I • I • I ) r 1«- 



•2-i ) ^ '^A^$(^<*I*x<^- 

3 • 3 • 3 • 3) 



y—y-'j: 
SIB-. 






— — 8 , ■«» , , J *-.,- ... 

«T ." * *. * * . • , 

v v , - -'■ • % •>' 



i 4 » 



. • ■ 



f - v _^-'*f 



*»Vn 



.. ..- 



^ .... 



8 . 






"3ft 



,<r' a» 






Se^tf 



v~1991^5^^/ 



s&jvtoftiifcM 



^A^fcA^^/cUfct© 



©^r-Jis©^/^*^© 
f^np^-nciiiario^ffl^ 

^/vc7£A,£g/u retort 6 



fF"nnfflb^Jl/tf±A' ; oTnSr' 

un&nr'feu^sSc -&©s 







l;*ft. C«4|T*f5i£#CG=>>x*l-£teftJ:ii:SoT 










T« l; *■ 5 ft' ? STOTjiS&A'* < > V T* \i <P % 4 



■&(Trt<rffit\z7"jt%%h<r>1f&> : bXtiV.f%, W^w^ 




■7 . r BUTAj5/HJI tti»l.>o«)-pA.-..-C<n*Bi'j:i''yf-t% 
hti f7H:f±€A( J Zh'iKX-ti U * 3 *>'*• ? 



8 r GIRL2jiaS* Jj*iE8v.-/>+>v.>>.'"7n, UU*:7>lJt> 
Ti%^tffc^C>,j:TT^%<75frt,fl-3TW;TJJl;'S>6 



WB(7)CG3Vx^S«%^S 



t?*S5 Tfcs 7 77-fy^ 

©O05 ii'Jiio'CW 







6^-f l-Jl/'i'LjaSW H,B— IIS. ^-P«*V-7'£l> 



s^y^/u^s^^^HDT?^ 



90^-9fl-§-* s b91^53-§-STro'f ?X t-g&FI 

co#^ (liia^Xc7)gttc7)A,gS[?:) t , 4-tf *<m & 

JSoT < rtf#lA jffliLX< n/;Ac7)4-*^btt 
SJf3*C r y77*'>W'XVer.2.0j4'S L* 

tft.t B itz. Js^ll-«J:o•c*>t>^o f *^^l-iM«' 

to L»^ l i!i9fl30B*7tXfc-p^Lato /- 
< * AJDSB&k fc^*> L X £ to 
=f105mmSli;'SEff<i4-10-7 TIM MS 
X-FANiSI«g|5 lil^tSfiC^CGa^xXh 







mifotxizt 



n?<.\-.$. w>/ s#<^JAia#•M^(2 



I • I • 2 • I ) r ?tf<«*ibL(««li)jBi*n»- D. 0. SOFT (I • I • 2 ■ 2 • I ) 
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* 

m 

h 

n 






7. 

9 

Jt 

s 

if 









^rC 


■tf^fcLMC33=fcU5L\ 



Audio-ONLYS/'J-X 

«^B r 33L\5>"a— fj(Romi 1989^3 

r TXAS J (f£B3f!5& 1989^4^^)o^U 

©tKb>©^ 5-A/, UT'JUfc'&o 
r *6ft£9;US57>j(Romi/19895 

53^ T©Xn^77A'JXK#^) =3BfGD 
Romi^Xi, ^JI*©^Jir\ S/^g^ffl 

rfcgfcbbi/fcournfcfflr-Lfco rfc, 

X6]^L^7iL^«^tfS5©/cofco 
r atS^M©3ij(Romi 1989^7^^) 

%£.yym\s&k±.^ )k\z/\\imM.tziz< B 

£-, tfc©PSGftffli;, ft/ur^n^ 

r b a - Xj (Romi 1 989^ 9 R m 5 

—a, Uct^^o 

r i§;qJfgii©Sj (Romi 1989^9^^) 



Audio-ONLY i/J-X No.3 

IP DEFFNA(R)=,RND( 1 )»R:SOUND 7,18:S0UND 8 

,15:S0UND 9,B:S0UND 10,16:SOUND 1 . I r SOUN 

5.15:SOUND 6.31 

28 F0RL=BT03:F0RI=8T0FNA<4) : FOR J=OT045ST 

EPRND(2>+.5:S0UND . 88+ J :SOUND 0,B:NEXT: 

F0RJ=BT0FNA(199):NEXTJ.I 

3B FORI=0TOFNA(4)+1 :S0UND1 1 .0 :SOUND 12.1 

6-.S0UND 13.0:FORJ=0TO99:NEXT:SOUND 11,99 

:SOUN0 12.40:SOUND 1 3 . 9 : FORJ=BT0399+ FNA ( 

991 :NEXTJ.I .L 

+ 1" FORI=8T0199:SOUND B.90:SOUND B.18B:NE 

XT: FORI iBTOIB: SOUND 8.15-1 : FDR J = 8T04 B : SCI 

UNO 0.80+J:SOUND B . B : NEXT J • I : FORI =0TO4 : S 

OUND 13.8:FORJ=0TO59:NEXTJ , I :SOUND 12.25 

B:SOUND 13.0:SOUN[> 6.0:SOUND 9.0:END 



1989^-1991^(DA:xSAVf^S^ • 3*±LZ 

X-Jt-nWtv'-iXCO r AV7*-5A ffla-f-CB, WTc53^ffl^P^5A#A^ru 
STo inii, 1989*1 H*§© r +t5>K77r-5Aj ^61991^8^^© r AV77f-5Aj C 
aBUfcftffidcO.-en-E-'n, getffflftK (Audio-ONLY), ty^WU^WCDf*® (Visual- 

only). Btevi7ji/fflfe;gffD° (Audio visual) ©fg^^tssajur, -hs#£M);jl, «■ 

/uTXfiSU,, gsfc, iR8^Sffla:A*tjt<CED*CJSofcf^SB<!!)U^S^»«L/ri^-rtf. 



OAlldiO-ONLYi/'J "X Sffl ** fffi '°* MSX • RAM32KTt>ft£ 

77-fJI/* : A-ONLY. AV 

evisual-ONLYS/'J— X n*Z'" n * nm * fa *' M s x 2 • v R A M 

7ri'A'8: v-only. av * 

OAudio-VisualrVU-X K^sx""v^M7 2 fr s AV7 '" 5Att 

7r-f)^ : AUDI&VIS.AV ""*' M b X ' V R A M l28 K *' 



MOhn 



x-r;^ 



'x-K~m?<Kmm.tf, s* 



3 n/c (-J-fJWcT'Sffl trvA j 7 ) UfTt 7*0 
BA' ; XJb / \>L-rU3;^ 

r ^K©^t'^Aj(aAl3RD]8S 1989^ 
18^) 13— tf£tlAV 

fly^Nffifa-U'^jfAOTAX 
l989^ll3^)oSS©8?*Ct:>7$"Jffli+ 

r Vy^j(535^ 1989^1E^^) 3© 

i>z<iitsi\ 

T mmti x ig, *»# ea-j (aotax 

l990^2^^) o 3nBllffl«[-t7?A ; 5g:^o 
fco Romi(=:ttP^5-tz>xr"f 

r SLn*!$j(M'l D l990^3^^) o 
^Kb'J-XHIffo 

r AMUI©mii(SE I 3d 199D^3^^) 

5— A/, f!ffl&m^/c 

rj &3b*I£j(M'l 1991^1 3€)o 
r c:'5ly/-^/-cPSG J (;iSfiP 1991^2^ 

B^ffltM'fi^anrffofc^iocBfc/cfflo 

— fcf— • A-y-VToTffl^is^UUo 
r _l3AK3?j(d;Ue77h 1991^8^ 
^)o ¥fflA©tzU7tfSS7¥^©AV*Xo 
W^x-rx^rissfc'i-j-rozffl^sic^sijic 



Audio-ONLY i/'J-X No.16 



• SOUND7.56:FORI=98TO21STEP-2:0=I+1B-RND 

( 1 )«2B :PLAY"T12BV15L48N=0:" : NEXT : G0SUB3 : 

S0UND7.159:S0UND6.61 : SOUND 1 B . 1 6 : SOUND 1 2 . 

88:SOUND13.B:GOSUB3:SOUND7.56:PLAY"T120V 

15L6401GR2GR2GR2GR2GR2" . " Tl 2BV1 5L640! A-R 

2A+R2A+R2A+R2A+R2" 

: GOSUB3:SOUND7,56:PLAY"V15T128L12D3D[>tc 

R16DE" ."V13T12BL1204D-D*CR16DD":G0SUB3:E 

ND 

3 F0RI=8T015BB:NEXT:RETURN 



Visual-0NLY2/U-X 

-o T2—y?mzi>fflfcMUZ-? a 

r ^-f Ah>^.^j(*UJlEg 1989^8^ 

HKroHBiB^/cTBafo SWgttSo 
r m7t*Jj (^LiliEg 1989^83^)oXn- 

^W^SIA'*C:'c!:rl"o SJftrJBfci^a 

S*SB-[5]U ; o<OLSLy/co f^ffo 
rr f Frftj (titbfoZ 1990^5^^) o SBIi 



Visual-ONLY ->J-X 



mm • titb&z 





02ftfc : :, *T9?oTL*- 



' SCREEN5:C0L0R=(2.2.B.4) :C0L0R2. 15. 15 :C 

LS:X-=12B:Y=135 

- DRAU"BM130.78L4HL3GLHL7GL5GL2GDGDGD4GD 

6GD4GD2U13HU3EU2EU2EU3EU2REUER3E2R3EURFR 

ERER18FRFRF5R2F2DFDF2D2FD6GDFD3GFRFGLGLR 

2DRFDU3NLENUFD4GD3GD3GD3G2DL2H2EUBU2UR2U 

RU3RU4LULDLDGLD4GD4U4EU3RE2DFLD3LDBD13R2 

FDFDF5D22L27UEHG2DL8U2EUEUH3UD6 

DRAUI-GD3BU11NG2U2HU3GLG2LGLGLGL2GLGL2G 
LD8R16U2EU5BR6FER8ERE3UEUE3UEUE3UE4UHU5H 
D7LG5LGL2UHUDFDFGHDLFLDL2DNL3GNF2L8GRD2F 
DFD2BU8L7HGUHUL2ULHUH3U3HU3HU7HU4LU3RD2U 
5EU2RUEURUEDR8D3FDFD2GDBU8BLL2EL7G2BD4R2 
UEFURUR2GR2FL3FL2BD5GLHB013F0 
■. DRAWBR2EUERE2REHLBL2UBD3BR4R2E2BU3UPB 
D4DBE3FDGBL2GFR3F5D2GL2HL3BF2L30L6HBH3DL 
3U2FR14BR9U4BU3UHUBR5BU2EUHUEBUBEUH8L2BH 
L2GHGL2KLHLER2URF2DL2U2R3DRDBD5NELGL2HBE 
2L2HBL3FH2GU2EBU4R2UR6DR3DRFUH2L2ULHL4GN 
R6LGRBR14EHBH3BUU2BU5HBU4E2FG2DF204FD4F3 
DFDFD3FU2E3 

S PA I NT (X. 65) :PAINT(X. 118) : PAINT (185, Yl : 
PAINT! 14B.Y) 

FORS = 8TO3880:NEXT:FORJ=9TO0STEP-1 :FORI 
= 1B7T0127STEP28:C0PY( I - .1 . 46* J ) - ( I • J .14 1 + 
J)TO(I-J.45+J) : NEXT: NEXT : FORS=0TO3B0B : NE 
XT:0PEN"GRP:"AS»1 : PSET ( 238 . 28B ) : PRINT*! . 
"END" 
7 GOTO 7 
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r AV7 7C— ^Aj'SCQ&fij^cf]/ IfoWWMitlQ^— iJ(mTsm(DBmit^- 



- mni 



xz<n z\-i— cnmm.y'o^'yMt, »=ES 3(R a m 8 KJiLh)E232/2+ 

** = CS32/2+(V R AMI28K)ffl, * * * = CS32+*fflT'-r 



r Msxry^K^i'3''"rSj(33«)Sr/ 

r 7K©^j(R^P^ 1990^1 03*§) o 5-A/, 

r -rsu<S^j(S^«/1991^3^^/'T 
© l J7,h)o-?VX--/ct^L>ofc. 7XU 

r ^-rKJbj(33»Sr !99t^3^^)oL I 
NE££DRAW£mrtf"ori, >§©£#. 

r Silent Evej(DXl 4 '1991*P6E*i)< 

-Aa IUU 
r BL I NDj(NAVA 1991^83^)oX 

Of So 7-ff7lrtft„ 
r C^&Atn-g>j(U^*- 1991^BB^)c 

i©GlCMor*^"ro S/u£&<, Wo 



Visual-ONLY WJ-X NoB 







1 c( 

(48 
T01 



BT02 
P(8. 
+ FIX 
4) I ) 
J CI 
4I«1 
N0(- 
31 .4 
4 SI 



LOR1 
12)- 
CIRC 
:LIN 
2B.2 
RA = B 



5STE 
12-1 
(A/6 
:C = C 
RCLE 
28*R 
TIME 



4.8:SCREEN5:S 
LINE 
12 

31-S 

■ 3. 

ORB = 

13) 

• 2d 

2/3B 

(A-F 

AN DC 



TEPI 
B:C = 
B,14 
FIX! 
(25- 
)»2) 
B*(A 



.BF : 

• 13. 

-7, 1 
6.3i 
B:F0 
»(A> 
A/61 
A>*2 
TO( ( 
>23A 



ETPAGE1 ■ 1 :CLS:LINE 

-(6.4) ,4,BF :FORA=B 

3.5:PAINTSTEP<8.8) 

TERM .11.1 .B:LINE( 

BF:NEXT 

1T025STEP1+A*2/18: 

»2)TO((A-FIX(A/6)« 

I :C=C*1 :NEXT:FORB= 

8:C0PY(26+B.8)-STE 

IX(A/6)«6)«48*C22 

>7ANDA'.3B>»< 1-(A>2 



'3 



EP(B.4-(A<1 10RA-RNDI-TIME )«3>2 

(-TIME>«9> , 2,14.RNDI-TIME)«6.R 

6:NEXT:NEXT:LINE(26.8)-I26.1 



:TPAGE8.8:CLS:LINE(B.65)-(255.21 1 ) .8. 
BF:LINE(3.6B)-(3B.211).4:PAINT(B.65I.4:F 
ORA=1T0156:COPY(B.B)-(26.14) . 1T0(255-A.5 
B) : NEXT :FORA=8T03B: COPY! (A-FIX(A/6)«6)»4 
B.28*FIX(A/6)«2B>-STEPC37.16) .1T0(99-A«3 
♦(A>24)»4,48) :FORB=8TO15-(A=38)»1508-(A= 
29)«7B8 
5 NEXTB.A:G0TO4 



Audio Visuah>U-X 

r «ilj (A 1/1989*P10J^ Tffl'JXhlo 
I v IIl:/J^P3^i<„ WifcUUfcZ 

r rt>yi:&3¥/vAA0TAX 19895" 11 
E*f) mmtzftt5frbl\o tihjtzhi&QBft* 

o^^rus. glints u i\> 
r iS©iv^hy\"X^7-j(MACKtt*,' 
] 990^33^) oAX© r =l-^jiL^lt©fc 

to c u 7 u x -r tj*^ >v tm U r l \«, 
r ¥AMEj(Romi 19903"3^) o "7 tT 

r aSS^^S!lj(AOTAX 1990^4^ 
^ T©UXS)oil7J*ffitl5fflc^ ^5£rt 

t'-mfii;zi^(DT\ mmzmm?zM-Dzi\ 

r St-M4j(AOTAX, 1990^61^ 

rss©7b ,; 3nuLi 

r 'Y?-7y<-tti(S51F E 3 199Q^g^^)c»2 

l^©-8g£U5Sitfel;:7nX^Ao rfet" 
va7JUBd;<r'$rn-§c, 
r fi£3*3g?lCc};<3D§Ili!.j(oA;<'TEAM 

ib-^3VS©Stfv i0tl<"£liA''-5gc< 

fc 



Audio Visual £>U— X No.l 

#|j^j * * ■»LU* • A 1 




















18 COLOR 15.8.8:SCREEN7:SETPAGE8. 1 :CLS: 

AINT(B.B) .14 

2? FORI=BT099:CIRCLE(RND( 1 )«58B.RND( 1 ) » 

5 8*68) .RND( 1 )«5+9.RND(l ) »8*6 : L INE ( RNO ( 1 

«58 8t6.RN0( 1 )*28)-STEP(-RND( 1 )«30+3.RND 

1 )»18B*8B) .RNDd )«8»6 

3d NEXT:PUTSPRITEB. (B.2B8 1 :SETPAGE1 :SOU 

D8.15:SOUND7. 1 

4B A=13:F0RI=6T013:C0L0R=(I.7,7.7) :COLO 

=<A.5.5.5) :A=I:NEXT:G0T04B 


> 



*=E"32/2+(V R A M64Ki-Xii) 

5zm<D 

^CttTOS&^ofc©^ MOTOR 
iife^7y*D¥C&^fcl8892f4/ltS£. 

5ffl7J^UUiES© r ffi7fcffj (1969^8 

TAKEW© r S;ij(1989^1D^€» 
«)Beatf3tB,l5.n*CtUF0 
Ttt-fBlSUttUoIlXVhCrUFOffl 

aa:if. /cLirLvfflAissurTSu© 

fcA % 6, dfA/^Sr^l-M \®1£&— !! j 

t'oc. 3niS33^U7j^/c«So r ^ 

unfdfffi#*<ftO r AV7^- ^ 

S(Z)^lSj(l990SpP^^aK)tU5 

S<tA/i: l AOTS;/-urSfc©& 

t;*UB7ai'5A®flStr»S:A;r, 

B;fttf(ja;5SCAor5. (*l) 
A V7*-7AS?SA- *.ifft 



1 1991^3*^), 



r f->J 

j/3\3 



r Vt-j(TO 
tU5Vt-0 
©ffnno 

r rSXj(DX14 1991^7^*§)cri©K© 
r 5Xf'J- tt-XJl/ • ^BAlffijO^bot 

ssty^ lggi^s^^oSxx'j— tt-^ 



Audio Visual v'J— X No5 
®Sg^^5^*"»^H«-AOTAX 




<n O 

Jit£ 

7 *• 
1 ' 
T w 

8 t 

a s 

L ^ 

T 

l>i 

?> OT 

[p 












IB COLOR.B.B:SCREEN5:SOUND7,7:SOUH 
28 FORI=28T097:C=C»lt(C=18)«le:A=E 
B):B=SIN!3. 14159/4. 5«C)«A/5:LINE(1 
05-A+B)-STEP(8.A«2) . C : L INE (127-A . 1 
)-STEP(B.A«2) .C:NEXT 
38 S0UND8.8:F0RI = 1T01B:C0L0R=U .8 
OLOR= 1 IMOD18+1 .7.7.7) : NEXT: SOUNDS 
038 


D6.0 
XPQ/2 
27»A.1 
85-AtB 

B.B) :c 
15:G0T 



* 



t ? 1 

ill 

* <-- 1 

* 3 M 

L>T* P 

4' <» 

ill 



h 7 Ji 

z. f i 

ill! 

ill 



< 



m 

? a i> 

n ' 3 ? 
; -, u ? » 
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